GothenburgBitFactory/taskwarrior
1
0
Fork 0
mirror of https://github.com/GothenburgBitFactory/taskwarrior.git synced 2025-06-26 10:54:26 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Unit Tests

Browse source 
- Corrected tests that are no longer valid.
This commit is contained in:
Paul Beckingham 2014-08-24 15:35:05 -04:00
parent 02aed51196
commit 62dc276f0b
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
test/undo.t
View file

@ -48,15 +48,15 @@ if (open my $fh, '>', $rc)
# Test the add/done/undo commands. # Test the add/done/undo commands.
my $output = qx{../src/task rc:$rc add one 2>&1; ../src/task rc:$rc info 1 2>&1}; my $output = qx{../src/task rc:$rc add one 2>&1; ../src/task rc:$rc info 1 2>&1};
ok (-r 'pending.data', "$ut: pending.data created"); ok (-r 'pending.data', "$ut: pending.data created");
ok (! -r 'completed.data', "$ut: completed.data not created"); ok (-r 'completed.data', "$ut: completed.data created");
like ($output, qr/Status\s+Pending\n/, "$ut: Pending"); like ($output, qr/Status\s+Pending\n/, "$ut: Pending");
$output = qx{../src/task rc:$rc 1 done 2>&1; ../src/task rc:$rc info 1 2>&1}; $output = qx{../src/task rc:$rc 1 done 2>&1; ../src/task rc:$rc info 1 2>&1};
ok (! -r 'completed.data', "$ut: completed.data created"); ok (-r 'completed.data', "$ut: completed.data exists");
like ($output, qr/Status\s+Completed\n/, "$ut: Completed"); like ($output, qr/Status\s+Completed\n/, "$ut: Completed");
$output = qx{../src/task rc:$rc undo 2>&1; ../src/task rc:$rc info 1 2>&1}; $output = qx{../src/task rc:$rc undo 2>&1; ../src/task rc:$rc info 1 2>&1};
ok (-r 'completed.data', "$ut: completed.data created"); ok (-r 'completed.data', "$ut: completed.data exists");
like ($output, qr/Status\s+Pending\n/, "$ut: Pending"); like ($output, qr/Status\s+Pending\n/, "$ut: Pending");
$output = qx{../src/task rc:$rc 1 done 2>&1; ../src/task rc:$rc list 2>&1 >/dev/null}; $output = qx{../src/task rc:$rc 1 done 2>&1; ../src/task rc:$rc list 2>&1 >/dev/null};
@ -82,7 +82,7 @@ if (open my $fh, '<', 'backlog.data')
my @lines = <$fh>; my @lines = <$fh>;
close $fh; close $fh;
diag ($_) for @lines; #diag ($_) for @lines;
is (scalar (@lines), 4, "$ut: 4 lines of backlog"); is (scalar (@lines), 4, "$ut: 4 lines of backlog");
ok (index ($lines[0], '"status":"pending"') != -1, "$ut: [0] pending"); ok (index ($lines[0], '"status":"pending"') != -1, "$ut: [0] pending");
ok (index ($lines[1], '"status":"completed"') != -1, "$ut: [1] completed"); ok (index ($lines[1], '"status":"completed"') != -1, "$ut: [1] completed");