Unit Tests
- Removed excessive tests that add nothing.
This commit is contained in:
@@ -27,7 +27,7 @@
|
|||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use Test::More tests => 6;
|
use Test::More tests => 3;
|
||||||
|
|
||||||
# Ensure environment has no influence.
|
# Ensure environment has no influence.
|
||||||
delete $ENV{'TASKDATA'};
|
delete $ENV{'TASKDATA'};
|
||||||
@@ -54,12 +54,6 @@ $output = qx{../src/task rc:$rc long 2>&1};
|
|||||||
like ($output, qr/one\\/, "$ut: Backslash preserved in description");
|
like ($output, qr/one\\/, "$ut: Backslash preserved in description");
|
||||||
like ($output, qr/foo\\/, "$ut: Backslash preserved in annotation 1");
|
like ($output, qr/foo\\/, "$ut: Backslash preserved in annotation 1");
|
||||||
|
|
||||||
qx{../src/task rc:$rc 1 annotate bar\\\\ 2>&1};
|
|
||||||
$output = qx{../src/task rc:$rc long 2>&1};
|
|
||||||
like ($output, qr/one\\/, "$ut: Backslash preserved in description");
|
|
||||||
like ($output, qr/foo\\/, "$ut: Backslash preserved in annotation 1");
|
|
||||||
like ($output, qr/bar\\/, "$ut: Backslash preserved in annotation 2");
|
|
||||||
|
|
||||||
# Cleanup.
|
# Cleanup.
|
||||||
unlink qw(pending.data completed.data undo.data backlog.data), $rc;
|
unlink qw(pending.data completed.data undo.data backlog.data), $rc;
|
||||||
exit 0;
|
exit 0;
|
||||||
|
|||||||
Reference in New Issue
Block a user