Unit Tests

- Removed excessive tests that add nothing.
This commit is contained in:
Paul Beckingham 2014-08-31 13:06:58 -04:00
parent fe7683db4a
commit 90643635cd

View file

@ -27,7 +27,7 @@
use strict;
use warnings;
use Test::More tests => 6;
use Test::More tests => 3;
# Ensure environment has no influence.
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/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.
unlink qw(pending.data completed.data undo.data backlog.data), $rc;
exit 0;