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 
- Removed mention of synch.key from all unit tests.  This is an obsolete file.
This commit is contained in:
Paul Beckingham 2012-10-01 23:56:09 -04:00
parent 337e5557b3
commit b1443e831b
204 changed files with 208 additions and 440 deletions
Download patch file Download diff file Expand all files Collapse all files

3
test/abbreviation.t
View file

@ -90,12 +90,11 @@ $output = qx{../src/task rc:abbrev.rc v 2>&1};
like ($output, qr/MIT\s+license/, 'version');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key abbrev.rc);
unlink qw(pending.data completed.data undo.data backlog.data abbrev.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'abbrev.rc', 'Cleanup');
exit 0;

3
test/add.t
View file

@ -56,12 +56,11 @@ like ($output, qr/Status\s+Pending\n/, 'add Pending');
like ($output, qr/Description\s+This a TEST\n/, 'add Description');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key add.rc);
unlink qw(pending.data completed.data undo.data backlog.data add.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'add.rc', 'Cleanup');
exit 0;

3
test/alias.t
View file

@ -53,12 +53,11 @@ $output = qx{../src/task rc:alias.rc bar 2>&1};
like ($output, qr/ALIAS/, 'task bar -> foo -> _projects -> ALIAS');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key alias.rc);
unlink qw(pending.data completed.data undo.data backlog.data alias.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'alias.rc', 'Cleanup');
exit 0;

3
test/annotate.t
View file

@ -114,12 +114,11 @@ like ($output, qr/three.+\d{1,6}\s+\d{1,6}\s+baz1/ms,'dateformat - first annota
like ($output, qr/4 tasks/, 'count');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key annotate.rc annotate2.rc);
unlink qw(pending.data completed.data undo.data backlog.data annotate.rc annotate2.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'annotate.rc' &&
! -r 'annotate2.rc', 'Cleanup');

3
test/append.t
View file

@ -50,12 +50,11 @@ $output = qx{../src/task rc:append.rc 1 append 2>&1};
unlike ($output, qr/Appended 0 tasks/, 'blank append failed');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key append.rc);
unlink qw(pending.data completed.data undo.data backlog.data append.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'append.rc', 'Cleanup');
exit 0;

3
test/args.1.t
View file

@ -55,12 +55,11 @@ $output = qx{../src/task rc:args.rc done 2 2>&1};
unlike ($output, qr/^Completed 2 /ms, 'ID after COMMAND');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key args.rc);
unlink qw(pending.data completed.data undo.data backlog.data args.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'args.rc', 'Cleanup');
exit 0;

3
test/args.2.t
View file

@ -67,12 +67,11 @@ $output = qx{../src/task rc:args.rc 5 info 2>&1};
like ($output, qr/Project\s+A/, 'done enpassant project');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key args.rc);
unlink qw(pending.data completed.data undo.data backlog.data args.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'args.rc', 'Cleanup');
exit 0;

3
test/args.3.t
View file

@ -67,12 +67,11 @@ $output = qx{../src/task rc:args.rc 5 info 2>&1};
like ($output, qr/Project\s+A/, 'delete enpassant project');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key args.rc);
unlink qw(pending.data completed.data undo.data backlog.data args.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'args.rc', 'Cleanup');
exit 0;

3
test/args.4.t
View file

@ -67,12 +67,11 @@ $output = qx{../src/task rc:args.rc 5 info 2>&1};
like ($output, qr/Project\s+A/, 'start enpassant project');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key args.rc);
unlink qw(pending.data completed.data undo.data backlog.data args.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'args.rc', 'Cleanup');
exit 0;

3
test/args.5.t
View file

@ -73,12 +73,11 @@ $output = qx{../src/task rc:args.rc 5 info 2>&1};
like ($output, qr/Project\s+A/, 'stop enpassant project');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key args.rc);
unlink qw(pending.data completed.data undo.data backlog.data args.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'args.rc', 'Cleanup');
exit 0;

3
test/args.t
View file

@ -61,12 +61,11 @@ $output = qx{../src/task rc:args.rc info 1 2>&1};
like ($output, qr/Description\s+project:p\spri:H\s\+tag\sfoo\n/ms, 'task 1 modify -- project:p pri:H +tag foo');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key args.rc);
unlink qw(pending.data completed.data undo.data backlog.data args.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'args.rc', 'Cleanup');
exit 0;

3
test/backslash.t
View file

@ -44,12 +44,11 @@ my $output = qx{../src/task rc:backslash.rc ls 2>&1};
like ($output, qr/\\/, 'Backslash preserved, no parsing issues');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key backslash.rc);
unlink qw(pending.data completed.data undo.data backlog.data backslash.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'backslash.rc', 'Cleanup');
exit 0;

3
test/bash_completion.t
View file

@ -129,12 +129,11 @@ ok ($? == 0, 'Exit status check');
unlike ($output, qr/1/, '\'depe:\' does not expand if abbreviation.minimum is 5');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc task.sh);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc task.sh);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc' &&
! -r 'task.sh', 'Cleanup');

3
test/bug.1006.t
View file

@ -58,12 +58,11 @@ $output = qx{../src/task rc:bug.rc list interdite 2>&1};
like ($output, qr/entrée interdite/, "'entrée' left intact");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.1023.t
View file

@ -59,12 +59,11 @@ unlike ($output, qr/Project\s*garden/, "default project not re-applied on attrib
unlike ($output, qr/Project\s*home/, "default project not re-applied on attribute removal.");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.1031.t
View file

@ -54,12 +54,11 @@ $output = qx{../src/task rc:bug.rc 3 info 2>&1};
like ($output, qr/Description\s+to from$/ms, "'to -- from' --> 'to from'");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.1036.t
View file

@ -51,12 +51,11 @@ $output = qx{../src/task rc:bug.rc 1 mod /test/Test/ 2>&1};
like ($output, qr/^Modifying task 1 'Test'.$/ms, 'Task with "until" attribute modified');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.1043.t
View file

@ -51,12 +51,11 @@ $output = qx{../src/task rc:bug.rc _zshcommands 2>&1};
unlike ($output, qr/samplealias/, 'aliases are not listed in _zshcommands');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.1044.t
View file

@ -51,12 +51,11 @@ my $output = qx{../src/task rc:bug.rc project:B projects 2>&1};
like ($output, qr/^1 project \(1 task\)$/ms, 'Summary filtered new deleted task 3 and project A');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.1056.t
View file

@ -61,12 +61,11 @@ like ($lines[5], qr/^\s\schild\s+\d/, "' child' indented, withou
like ($lines[6], qr/^myProject\.\s+\d/, "'myProject.' not indented, with data");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.1056);
unlink qw(pending.data completed.data undo.data backlog.data bug.1056);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.1056', 'Cleanup');
exit 0;

3
test/bug.1065.t
View file

@ -68,12 +68,11 @@ ok ($? == 0, 'Exit status check');
unlike ($output, qr/unrecognized variables/, 'Message is not shown when no non-default matches in pattern');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

5
test/bug.1104.t
View file

@ -137,24 +137,21 @@ ok ($? == 0, 'Exit status check');
unlike ($output, qr/Retaining/, "Must not retain changes");
# Cleanup.
unlink qw(1.rc 1/pending.data 1/completed.data 1/undo.data 1/backlog.data 1/synch.key 2/pending.data 2/completed.data 2/undo.data 2.rc 2/backlog.data 2/synch.key dropbox/completed.data dropbox/pending.data dropbox/undo.data 3/pending.data 3/undo.data 3/completed.data 3/backlog.data 3/synch.key 3.rc);
unlink qw(1.rc 1/pending.data 1/completed.data 1/undo.data 1/backlog.data 2/pending.data 2/completed.data 2/undo.data 2.rc 2/backlog.data dropbox/completed.data dropbox/pending.data dropbox/undo.data 3/pending.data 3/undo.data 3/completed.data 3/backlog.data 3.rc);
ok (! -r '1/pending.data' &&
! -r '1/completed.data' &&
! -r '1/undo.data' &&
! -r '1/backlog.data' &&
! -r '1/synch.key' &&
! -r '1.rc' &&
! -r '2/pending.data' &&
! -r '2/completed.data' &&
! -r '2/undo.data' &&
! -r '2/backlog.data' &&
! -r '2/synch.key' &&
! -r '2.rc' &&
! -r '3/pending.data' &&
! -r '3/completed.data' &&
! -r '3/undo.data' &&
! -r '3/backlog.data' &&
! -r '3/synch.key' &&
! -r '3.rc' &&
! -r 'dropbox/pending.data' &&
! -r 'dropbox/completed.data' &&

3
test/bug.299.t
View file

@ -52,12 +52,11 @@ unlike ($output, qr/two.*bar/ms, 'project.isnt:one project.isnt:two - no bar');
like ($output, qr/three.*baz/ms, 'project.isnt:one project.isnt:two - yes baz');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.327.t
View file

@ -50,12 +50,11 @@ my $output = qx{../src/task rc:bug.rc li 2>&1};
unlike ($output, qr/1969/ms, 'Should not display 12/31/1969');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.360.t
View file

@ -70,12 +70,11 @@ $output = qx{../src/task rc:bug.rc diag 2>&1};
like ($output, qr/No duplicates found/, 'No duplicate UUIDs detected');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.368.t
View file

@ -49,12 +49,11 @@ unlike ($output, qr/Until\s+\d{10}/, 'until is not shown as an epoch');
like ($output, qr/Until\s+\d+\/\d+\/\d{4}/, 'until is shown as a date');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.414.t
View file

@ -57,12 +57,11 @@ $output = qx{../src/task rc:bug.rc ls -föo 2>&1};
unlike ($output, qr/two/, 'not found UTF8 tag föo');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.417.t
View file

@ -51,12 +51,11 @@ $output = qx{../src/task rc:bug.rc rc.report.long.sort:due- long 2>&1};
like ($output, qr/after.+now.+before/ms, 'rc.report.long.sort:due- works');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.418.t
View file

@ -80,12 +80,11 @@ unlike ($output, qr/eight/ms, 'task 8 not listed');
unlike ($output, qr/nine/ms, 'task 9 not listed');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.425.t
View file

@ -52,12 +52,11 @@ my $output = qx{../src/task rc:425.rc 1 ls 2>&1};
like ($output, qr/1\s+Bar in Bar/m, 'parser - interpret \'in\' in description');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key 425.rc);
unlink qw(pending.data completed.data undo.data backlog.data 425.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r '425.rc', 'Cleanup');
exit 0;

3
test/bug.434.t
View file

@ -47,12 +47,11 @@ my $output = qx{../src/task rc:bug.rc 1 done 2>&1};
like ($output, qr/Completed 1 task\./, 'Waiting task marked completed');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.438.t
View file

@ -82,12 +82,11 @@ $output = qx{../src/task rc:bug.rc rc.report.foo.sort:end- foo 2>&1};
like ($output, qr/newer.+older/ms, 'sort:end- -> newer older');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.440.t
View file

@ -60,12 +60,11 @@ unlike ($output2, qr/Foo/, 'simultaneous append and subst - subst');
like ($output2, qr/\w+ Appendtext/, 'simultaneous append and subst - append');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key 440.rc);
unlink qw(pending.data completed.data undo.data backlog.data 440.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r '440.rc', 'Cleanup');
exit 0;

3
test/bug.441.t
View file

@ -47,12 +47,11 @@ my $output = qx{../src/task rc:441.rc ls 2>&1};
like ($output, qr/one two: three/ms, 'Substitution with colon worked');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key 441.rc);
unlink qw(pending.data completed.data undo.data backlog.data 441.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r '441.rc', 'Cleanup');
exit 0;

3
test/bug.455.t
View file

@ -50,12 +50,11 @@ like ($output, qr/\s{7}abc/ms, 'bug 455 - correct spacing in utf8 task');
like ($output, qr/\s{7}def/ms, 'bug 455 - correct spacing in non utf8 task');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key 455.rc);
unlink qw(pending.data completed.data undo.data backlog.data 455.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r '455.rc', 'Cleanup');
exit 0;

3
test/bug.480.t
View file

@ -123,12 +123,11 @@ unlike ($output, qr/two/, 'Triple: no @foo.2');
unlike ($output, qr/three/, 'Triple: no @foo.3');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.489.t
View file

@ -47,12 +47,11 @@ unlike ($output, qr/with /, 'tags.none: skips tagged');
like ($output, qr/without/, 'tags.none: finds tagless');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.495.t
View file

@ -47,12 +47,11 @@ my $output = qx{../src/task rc:bug.rc list 2>&1};
like ($output, qr/This is -- a -- test/, 'Double hyphens preserved, except the first ones.');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.555.t
View file

@ -44,12 +44,11 @@ my $output = qx{../src/task rc:bug.rc log description project:p 2>&1};
unlike ($output, qr/Segmentation fault/, 'no segfault from log with project');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

6
test/bug.580.t
View file

@ -73,21 +73,19 @@ my $output = qx{../src/task rc:remote.rc ls 2>&1};
like ($output, qr/local task/, "autopush failed");
# Cleanup.
unlink qw(local/pending.data local/completed.data local/undo.data local/undo.save local/backlog.data local/synch.key local.rc);
unlink qw(local/pending.data local/completed.data local/undo.data local/undo.save local/backlog.data local.rc);
ok (! -r 'local/pending.data' &&
! -r 'local/completed.data' &&
! -r 'local/undo.data' &&
! -r 'local/undo.save' &&
! -r 'local/backlog.data' &&
! -r 'local/synch.key' &&
! -r 'local.rc', 'Cleanup');
unlink qw(remote/pending.data remote/completed.data remote/undo.data remote/backlog.data remote/synch.key remote.rc);
unlink qw(remote/pending.data remote/completed.data remote/undo.data remote/backlog.data remote.rc);
ok (! -r 'remote/pending.data' &&
! -r 'remote/completed.data' &&
! -r 'remote/undo.data' &&
! -r 'remote/backlog.data' &&
! -r 'remote/synch.key' &&
! -r 'remote.rc', 'Cleanup');
rmdir("remote/extensions");

3
test/bug.605.t
View file

@ -54,12 +54,11 @@ $output = qx{../src/task rc:bug.rc 2 done 2>&1 >/dev/null};
like ($output, qr/is 100\% complete/ms, 'Empty project correctly reported as being 100% completed.');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.628.t
View file

@ -50,12 +50,11 @@ my $output = qx{../src/task rc:bug.rc waiting 2>&1};
like ($output, qr/1\/1\/2020/ms, 'a b D Y dateformat correctly parsed.');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.634.t
View file

@ -49,12 +49,11 @@ my $output = qx{echo 'n' |../src/task rc:bug.rc rc.confirmation=off undo 2>&1};
unlike ($output, qr/Are you sure/ms, 'Undo honours confirmation=off.');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.635.t
View file

@ -52,12 +52,11 @@ my $output = qx{../src/task rc:bug.rc ls 1 2>&1};
like ($output, qr/Pay the rent on the 31st/ms, 'Global replace performed correctly.');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.649.t
View file

@ -51,12 +51,11 @@ like ($output, qr/is neither pending nor waiting/, 'Parent task not completabl
unlike ($output, qr/Completed 1/ms, 'New recurring task cannot be immediately completed.');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.656.t
View file

@ -56,12 +56,11 @@ my $output = qx{../src/task rc:bug.rc ls 2>&1};
unlike ($output, qr/^\s3\s*Second recurring task\s*$/ms, 'Extra task detected.');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.668.t
View file

@ -49,12 +49,11 @@ unlike ($output, qr/not a valid modifier/, 'standard syntax with dots');
unlike ($output, qr/not in the expected format/, 'standard syntax with dots');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.674.t
View file

@ -53,12 +53,11 @@ my $output = qx{../src/task rc:bug.rc 2 done 2>&1};
like ($output, qr/Two/ms, 'IDs correctly remain unchanged after done');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.694.t
View file

@ -51,12 +51,11 @@ like ($output, qr/foo/, 'found foo');
like ($output, qr/Due/, 'found Due');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.697.x
View file

@ -70,12 +70,11 @@ $output = qx{../src/task rc:bug.rc 3 info 2>&1};
like ($output, qr/is blocked by\s+2/, 'verified 1 --> 2');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.703.t
View file

@ -61,12 +61,11 @@ like ($output, qr/AnnotatIon two/, 'new annotation two');
like ($output, qr/AnnotatIon three/, 'new annotation three');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.708.t
View file

@ -68,12 +68,11 @@ $output = qx{../src/task rc:bug.rc 7-9 del 2>&1 >/dev/null};
like ($output, qr/Project 'p1' is 75% complete \(1 of 4 tasks remaining\)\./ms, 'Project counts correct for a multiple delete');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.804.t
View file

@ -57,12 +57,11 @@ like ($output, qr/vwxy\n/ms, 'not hyphenated 1');
like ($output, qr/uvwx\n/ms, 'not hyphenated 2');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.818.t
View file

@ -67,12 +67,11 @@ unlike ($output, qr/AAA/, '+anna !-> AAA');
like ($output, qr/BBB/, '+anna --> BBB');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.819.t
View file

@ -51,12 +51,11 @@ pass ("foo \(bar\) -- preserved -- TEST SKIPPED --");
like ($output, qr/baz \(qux\)/, "baz \(qux\) -- preserved");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.835.t
View file

@ -47,12 +47,11 @@ like ($output, qr/main\.subproject/, "Parens tolerated");
unlike ($output, qr/Mismatched parentheses in expression/, "No 'mismatch' error generated");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.837.t
View file

@ -57,12 +57,11 @@ $output = qx{../src/task rc:bug.rc 1 _urgency 2>&1};
like ($output, qr/ 0\n/, 'unblocked urgency == 0');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.839.t
View file

@ -50,12 +50,11 @@ like ($output, qr/One/, 'task listed');
unlike ($output, qr/The recurrence value '1m' is not valid\./, 'recu:1m => no error');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.851.t
View file

@ -54,12 +54,11 @@ unlike ($output, qr/yesterday/, "yesterday - not found after:1d");
like ($output, qr/tomorrow/, "tomorrow - found after:1d");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.856.t
View file

@ -57,12 +57,11 @@ like ($output, qr/floating/, 'project.none: matches floating');
unlike ($output, qr/assigned/, 'project.none: does not match assigned');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.860.t
View file

@ -44,12 +44,11 @@ my $output = qx{../src/task rc:bug.rc 1 info 2>&1};
like ($output, qr/Priority\s+H/, "pri:h --> pri:H");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.879.t
View file

@ -55,12 +55,11 @@ like ($output, qr/foo\\/, 'Backslash preserved in annotation 1');
like ($output, qr/bar\\/, 'Backslash preserved in annotation 2');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.884.t
View file

@ -49,12 +49,11 @@ pass ("/one/two/three/ --> preserved -- TEST SKIPPED --");
like ($output, qr/\/four\/five\/six\//, "/four/five/six/ --> preserved");
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.886.t
View file

@ -46,12 +46,11 @@ $output = qx{../src/task rc:bug.rc add two due:donkey 2>&1 >/dev/null};
like ($output, qr/was not recognized/, 'donkey --> invalid date');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.899.t
View file

@ -53,12 +53,11 @@ $output = qx{../src/task rc:bug.rc log three pro:A 2>&1 >/dev/null};
like ($output, qr/ 66% complete \(1 of 3 /, '1 of 3 tasks remaining - 66%');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.906.t
View file

@ -69,12 +69,11 @@ unlike ($output, qr/one/, 'list - one excluded');
like ($output, qr/two/, 'list - two included');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.917.t
View file

@ -52,12 +52,11 @@ like ($output, qr/one 'two' three/, 'Single quote preserved after modification')
like ($output, qr/four "five" six/, 'Double quote preserved after modification');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.924.t
View file

@ -48,12 +48,11 @@ like ($output, qr/\s2.0\n/ms, 'Single quote floating point preserved');
like ($output, qr/\s3.0\n/ms, 'Double quote floating point preserved');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.932.t
View file

@ -65,12 +65,11 @@ $output = qx{../src/task rc:bug.rc diag 2>&1};
like ($output, qr/No duplicates found/, 'No duplicate UUIDs detected');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.954.t
View file

@ -56,12 +56,11 @@ like ($output, qr/foo/ms, 'Task foo not deleted');
like ($output, qr/bar/ms, 'Task bar not deleted');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.955.t
View file

@ -54,12 +54,11 @@ $output = qx{../src/task rc:bug.rc ls 2>&1};
like ($output, qr/^No matches/ms, 'No tasks remaining');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.956.t
View file

@ -64,12 +64,11 @@ $output = qx{TASKRC=bug.rc ../src/task _ids 2>/dev/null};
unlike ($output, qr/TASKRC/ms, 'The header does not appear with "_ids" (2>/dev/null)');
### Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.972.t
View file

@ -45,12 +45,11 @@ my $output = qx{../src/task rc:bug.rc add foo due:now recur:2 2>&1};
like ($output, qr/ not recognized as valid, /, 'recur:2 is not valid');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.982.x
View file

@ -45,12 +45,11 @@ my $output = qx{../src/task rc:minus.rc 1 info 2>&1};
like ($output, qr/^Description 1-test 1\+tag$/ms, 'Description contains plus and minus signs');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key minus.rc);
unlink qw(pending.data completed.data undo.data backlog.data minus.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'minus.rc', 'Cleanup');
exit 0;

3
test/bug.986.t
View file

@ -58,12 +58,11 @@ $output = qx{../src/task rc:bug.rc test info rc.dateformat:__ rc.dateformat.info
like ($output, qr/__/ms, 'Date formatted according to dateformat');
### Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.987.x
View file

@ -90,12 +90,11 @@ qx{../src/task rc:bug.rc test_dsn start};
check_running_close_zero("test_dsn");
### Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.990.t
View file

@ -49,12 +49,11 @@ my $output = qx{../src/task rc:color.rc list 2>&1};
like ($output, qr/ \033\[32m .* test .* \033\[0m /x, 'Colored with the priority color, which has precedence over the tagged color');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key color.rc);
unlink qw(pending.data completed.data undo.data backlog.data color.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'color.rc', 'Cleanup');
exit 0;

3
test/bug.991.t
View file

@ -50,12 +50,11 @@ unlike ($output, qr/deprecated/ms, 'No deprecated variable');
unlike ($output, qr/unrecognized/ms, 'No unrecognized variable');
## Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.annotate.t
View file

@ -51,12 +51,11 @@ $output = qx{echo "y" | ../src/task rc:bug.rc annotate bar 2>&1 >/dev/null};
unlike ($output, qr/Command prevented from running/, 'Filter-less write command permitted');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.annual.t
View file

@ -72,12 +72,11 @@ $output = qx{../src/task rc:annual.rc diag 2>&1};
like ($output, qr/No duplicates found/, 'No duplicate UUIDs detected');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key annual.rc);
unlink qw(pending.data completed.data undo.data backlog.data annual.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'annual.rc', 'Cleanup');
exit 0;

3
test/bug.before.t
View file

@ -82,12 +82,11 @@ unlike ($output, qr/foo/, 'no foo after 5/1/2009');
unlike ($output, qr/bar/, 'no bar after 5/1/2009');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key before.rc);
unlink qw(pending.data completed.data undo.data backlog.data before.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'before.rc', 'Cleanup');
exit 0;

3
test/bug.bulk.t
View file

@ -70,12 +70,11 @@ like ($output, qr/Project\s+p1/, 'project applied to 6');
like ($output, qr/Priority\s+M/, 'priority applied to 6');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bulk.rc);
unlink qw(pending.data completed.data undo.data backlog.data bulk.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bulk.rc', 'Cleanup');
exit 0;

3
test/bug.c001.t
View file

@ -52,12 +52,11 @@ my $output = qx{../src/task rc:bug.rc add Second recurring task due:tomorrow rec
like ($output, qr/Created task 2\./ms, 'Recurring task assigned correct ID.');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.cal.t
View file

@ -104,12 +104,11 @@ $output = qx{../src/task rc:cal.rc cal due 2010 donkey 2>&1};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal due 2010 donkey');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key cal.rc);
unlink qw(pending.data completed.data undo.data backlog.data cal.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'cal.rc', 'Cleanup');
exit 0;

3
test/bug.concat.t
View file

@ -68,12 +68,11 @@ $output = qx{../src/task rc:bug.rc info 2 2>&1};
like ($output, qr/Description\s+aaa bbb:ccc ddd\n/, 'properly concatenated');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug.rc', 'Cleanup');
exit 0;

3
test/bug.hang.t
View file

@ -70,13 +70,12 @@ if ($@ eq "alarm\n")
}
# Cleanup.
unlink qw(shadow.txt pending.data completed.data undo.data backlog.data synch.key hang.rc);
unlink qw(shadow.txt pending.data completed.data undo.data backlog.data hang.rc);
ok (! -r 'shadow.txt' &&
! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'hang.rc', 'Cleanup');
exit 0;

3
test/bug.hasnt.t
View file

@ -87,12 +87,11 @@ unlike ($output, qr/\n 6/, '6 hasnt foo -> no');
like ($output, qr/\n 7/, '7 hasnt foo -> yes'); # 15
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key hasnt.rc);
unlink qw(pending.data completed.data undo.data backlog.data hasnt.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'hasnt.rc', 'Cleanup');
exit 0;

3
test/bug.period.t
View file

@ -157,12 +157,11 @@ $output = qx{../src/task rc:period.rc diag 2>&1};
like ($output, qr/No duplicates found/, 'No duplicate UUIDs detected');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key period.rc);
unlink qw(pending.data completed.data undo.data backlog.data period.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'period.rc', 'Cleanup');
exit 0;

3
test/bug.range.t
View file

@ -49,12 +49,11 @@ like ($output, qr/two/, 'Found within range');
unlike ($output, qr/three/, 'Missing after range');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key range.rc);
unlink qw(pending.data completed.data undo.data backlog.data range.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'range.rc', 'Cleanup');
exit 0;

3
test/bug.recur.t
View file

@ -45,12 +45,11 @@ my $output = qx{../src/task rc:recur.rc info 1 2>&1};
unlike ($output, qr/Description\s+foo/, 'task not created - missing due date');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key recur.rc);
unlink qw(pending.data completed.data undo.data backlog.data recur.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'recur.rc', 'Cleanup');
exit 0;

3
test/bug.sort.t
View file

@ -51,12 +51,11 @@ $output = qx{../src/task rc:bug_sort.rc list 2>&1};
like ($output, qr/three.*one.*two/msi, 'list did not hang after pri:H on 1');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bug_sort.rc);
unlink qw(pending.data completed.data undo.data backlog.data bug_sort.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bug_sort.rc', 'Cleanup');
exit 0;

3
test/bug.start.extra.t
View file

@ -49,12 +49,11 @@ like ($output, qr/L/, 'Correct priority');
like ($output, qr/bar/, 'Correct annotation');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key extra.rc);
unlink qw(pending.data completed.data undo.data backlog.data extra.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'extra.rc', 'Cleanup');
exit 0;

3
test/bug.summary.t
View file

@ -54,12 +54,11 @@ $output = qx{../src/task rc:summary.rc summary 2>&1};
like ($output, qr/A\s+1\s+(?:-|\d\ssecs?)\s+50%/, 'summary correctly shows 50% after report');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key summary.rc);
unlink qw(pending.data completed.data undo.data backlog.data summary.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'summary.rc', 'Cleanup');
exit 0;

3
test/bug.uuid.t
View file

@ -85,12 +85,11 @@ $output = qx{../src/task rc:uuid.rc diag 2>&1};
like ($output, qr/No duplicates found/, 'No duplicate UUIDs detected');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key uuid.rc);
unlink qw(pending.data completed.data undo.data backlog.data uuid.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'uuid.rc', 'Cleanup');
exit 0;

3
test/bulk.t
View file

@ -140,12 +140,11 @@ like ($output, qr/Deleted 0 tasks./, 'No task deleted');
unlike ($output, qr/delete task 17/, 'No question asked for subsequent tasks');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key bulk.rc);
unlink qw(pending.data completed.data undo.data backlog.data bulk.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'bulk.rc', 'Cleanup');
exit 0;

3
test/cal.t
View file

@ -259,12 +259,11 @@ like ($output, qr/30;103m15/, 'Holiday BBBBBB is color-coded');
like ($output, qr/30;103m25/, 'Holiday åäö is color-coded');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key details.rc);
unlink qw(pending.data completed.data undo.data backlog.data details.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'details.rc', 'Cleanup');
exit 0;

3
test/caseless.t
View file

@ -119,12 +119,11 @@ $output = qx{../src/task rc:caseless.rc rc.search.case.sensitive:no ls descripti
like ($output, qr/four five six/, 'one two three\nfour five six -> ls description.contains:Six caseless = succeed');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key caseless.rc);
unlink qw(pending.data completed.data undo.data backlog.data caseless.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'caseless.rc', 'Cleanup');
exit 0;

3
test/color.active.t
View file

@ -50,12 +50,11 @@ like ($output, qr/ (?!<\033\[\d\dm) .* nothing .* (?!>\033\[0m) /x, 'none');
like ($output, qr/ \033\[31m .* red .* \033\[0m /x, 'color.active');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key color.rc);
unlink qw(pending.data completed.data undo.data backlog.data color.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'color.rc', 'Cleanup');
exit 0;

3
test/color.blocked.t
View file

@ -51,12 +51,11 @@ like ($output, qr/ (?!<\033\[\d\dm) .* nothing .* (?!>\033\[0m) /x, 'none');
like ($output, qr/ \033\[31m .* red .* \033\[0m /x, 'color.blocked');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key color.rc);
unlink qw(pending.data completed.data undo.data backlog.data color.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'color.rc', 'Cleanup');
exit 0;

3
test/color.deprecated.t
View file

@ -45,12 +45,11 @@ my $output = qx{../src/task rc:color.rc show 2>&1};
like ($output, qr/that use deprecated underscores/ms, 'Deprecated color detected');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key color.rc);
unlink qw(pending.data completed.data undo.data backlog.data color.rc);
ok (! -r 'pending.data' &&
! -r 'completed.data' &&
! -r 'undo.data' &&
! -r 'backlog.data' &&
! -r 'synch.key' &&
! -r 'color.rc', 'Cleanup');
exit 0;

Some files were not shown because too many files have changed in this diff Show more