gergely/taskwarrior-2.x
1
0
Fork 0
Code Issues Actions Packages Projects Releases 1 Wiki Activity

Unit Tests

Browse Source 
- Modified testing to accomodate new split between stdout/stderr.
This commit is contained in:
Paul Beckingham
2012-07-03 15:43:19 -04:00
parent 75822eed47
commit da575c4043
185 changed files with 1591 additions and 1591 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
test/bug.before.t
View File

@@ -56,28 +56,28 @@ EOF
}
# Verify data is readable and just as expected.
my $output = qx{../src/task rc:before.rc 1 info};
my $output = qx{../src/task rc:before.rc 1 info 2>&1};
like ($output, qr/Start\s+12\/22\/2008/, 'task 1 start date as expected');
$output = qx{../src/task rc:before.rc 2 info};
$output = qx{../src/task rc:before.rc 2 info 2>&1};
like ($output, qr/Start\s+4\/17\/2009/, 'task 2 start date as expected');
$output = qx{../src/task rc:before.rc ls start.before:12/1/2008};
$output = qx{../src/task rc:before.rc ls start.before:12/1/2008 2>&1};
unlike ($output, qr/foo/, 'no foo before 12/1/2008');
unlike ($output, qr/bar/, 'no bar before 12/1/2008');
$output = qx{../src/task rc:before.rc ls start.before:1/1/2009};
$output = qx{../src/task rc:before.rc ls start.before:1/1/2009 2>&1};
like ($output, qr/foo/, 'foo before 1/1/2009');
unlike ($output, qr/bar/, 'no bar before 1/1/2009');
$output = qx{../src/task rc:before.rc ls start.before:5/1/2009};
$output = qx{../src/task rc:before.rc ls start.before:5/1/2009 2>&1};
like ($output, qr/foo/, 'foo before 5/1/2009');
like ($output, qr/bar/, 'bar before 5/1/2009');
$output = qx{../src/task rc:before.rc ls start.after:12/1/2008};
$output = qx{../src/task rc:before.rc ls start.after:12/1/2008 2>&1};
like ($output, qr/foo/, 'foo after 12/1/2008');
like ($output, qr/bar/, 'bar after 12/1/2008');
$output = qx{../src/task rc:before.rc ls start.after:1/1/2009};
$output = qx{../src/task rc:before.rc ls start.after:1/1/2009 2>&1};
unlike ($output, qr/foo/, 'no foo after 1/1/2009');
like ($output, qr/bar/, 'bar after 1/1/2009');
$output = qx{../src/task rc:before.rc ls start.after:5/1/2009};
$output = qx{../src/task rc:before.rc ls start.after:5/1/2009 2>&1};
unlike ($output, qr/foo/, 'no foo after 5/1/2009');
unlike ($output, qr/bar/, 'no bar after 5/1/2009');