diff --git a/test/bug.804.t b/test/bug.804.t index 219d85ff1..641514fbd 100755 --- a/test/bug.804.t +++ b/test/bug.804.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 6; +use Test::More tests => 4; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -44,7 +44,6 @@ if (open my $fh, '>', 'bug.rc') "report.unittest.columns=id,project,priority,description\n", "report.unittest.filter=status:pending\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 804: URL link and break line @@ -65,11 +64,5 @@ like ($output, qr/uvwx\n/ms, 'not hyphenated 2'); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.818.t b/test/bug.818.t index 7810981cb..356a3478a 100755 --- a/test/bug.818.t +++ b/test/bug.818.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 10; +use Test::More tests => 8; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug #818: Filtering by tag counter-intuitively uses partial match @@ -71,11 +70,5 @@ like ($output, qr/BBB/, '+anna --> BBB'); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.819.t b/test/bug.819.t index 39a9ab735..626311c66 100755 --- a/test/bug.819.t +++ b/test/bug.819.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 5; +use Test::More tests => 3; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 819: When I run "task add foo\'s bar." the description of the new task is "foo 's bar .". @@ -55,11 +54,5 @@ like ($output, qr/baz \(qux\)/, "baz \(qux\) -- preserved"); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.835.t b/test/bug.835.t index 20bf03a89..93dfc30f2 100755 --- a/test/bug.835.t +++ b/test/bug.835.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 5; +use Test::More tests => 3; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } qx{../src/task rc:bug.rc add pro:main.subproject Test 2>&1}; @@ -51,11 +50,5 @@ unlike ($output, qr/Mismatched parentheses in expression/, "No 'mismatch' error # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.837.t b/test/bug.837.t index 06f9e348d..40787cfc0 100755 --- a/test/bug.837.t +++ b/test/bug.837.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 5; +use Test::More tests => 3; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 837: When a task is completed, tasks that depended upon it don't have @@ -61,11 +60,5 @@ like ($output, qr/ 0\n/, 'unblocked urgency == 0'); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.839.t b/test/bug.839.t index 672bec906..00f82efa1 100755 --- a/test/bug.839.t +++ b/test/bug.839.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 5; +use Test::More tests => 3; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } if (open my $fh, '>', 'pending.data') @@ -54,11 +53,5 @@ unlike ($output, qr/The recurrence value '1m' is not valid\./, 'recu:1m => no er # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.851.t b/test/bug.851.t index 62ebda4a1..89b2b09d8 100755 --- a/test/bug.851.t +++ b/test/bug.851.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 8; +use Test::More tests => 6; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 851: Filtering by due dates with ordinal and d/wks/etc. doesn't work @@ -58,11 +57,5 @@ like ($output, qr/tomorrow/, "tomorrow - found after:1d"); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.856.t b/test/bug.856.t index 11e7ee54d..1721f638e 100755 --- a/test/bug.856.t +++ b/test/bug.856.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 8; +use Test::More tests => 6; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 856: "task list project.none:" does not work. @@ -61,11 +60,5 @@ unlike ($output, qr/assigned/, 'project.none: does not match assigned'); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.860.t b/test/bug.860.t index 3843b23b0..2b1bf499d 100755 --- a/test/bug.860.t +++ b/test/bug.860.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 3; +use Test::More tests => 1; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 869: lower case priorities aren't accepted. @@ -48,11 +47,5 @@ like ($output, qr/Priority\s+H/, "pri:h --> pri:H"); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.879.t b/test/bug.879.t index 5c38aa8b3..6797ea243 100755 --- a/test/bug.879.t +++ b/test/bug.879.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 8; +use Test::More tests => 6; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 879: Backslash at end of description/annotation causes problems. @@ -59,11 +58,5 @@ like ($output, qr/bar\\/, 'Backslash preserved in annotation 2'); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.884.t b/test/bug.884.t index 07dcb7201..292d40f9a 100755 --- a/test/bug.884.t +++ b/test/bug.884.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 4; +use Test::More tests => 2; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 884: Extra space in path name. @@ -53,11 +52,5 @@ like ($output, qr/\/four\/five\/six\//, "/four/five/six/ --> preserved"); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.886.t b/test/bug.886.t index 02520c329..6260fd158 100755 --- a/test/bug.886.t +++ b/test/bug.886.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 4; +use Test::More tests => 2; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -38,7 +38,6 @@ if (open my $fh, '>', 'bug.rc') { print $fh "data.location=.\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 886: tw doesn't warn the user if, e.g., a weekday cannot be resolved properly @@ -50,11 +49,5 @@ like ($output, qr/was not recognized/, 'donkey --> invalid date'); # Cleanup. 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 'bug.rc', 'Cleanup'); - exit 0; diff --git a/test/bug.899.t b/test/bug.899.t index e8cf01239..1af5e03ef 100755 --- a/test/bug.899.t +++ b/test/bug.899.t @@ -27,7 +27,7 @@ use strict; use warnings; -use Test::More tests => 6; +use Test::More tests => 4; # Ensure environment has no influence. delete $ENV{'TASKDATA'}; @@ -39,7 +39,6 @@ if (open my $fh, '>', 'bug.rc') print $fh "data.location=.\n", "confirmation=off\n"; close $fh; - ok (-r 'bug.rc', 'Created bug.rc'); } # Bug 899: task log does not behave correctly when logging into a project @@ -57,11 +56,5 @@ 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 bug.rc); -ok (! -r 'pending.data' && - ! -r 'completed.data' && - ! -r 'undo.data' && - ! -r 'backlog.data' && - ! -r 'bug.rc', 'Cleanup'); - exit 0;