Unit Tests

- Corrected unit tests which now pass, but never did before.
This commit is contained in:
Paul Beckingham 2014-08-30 15:42:01 -04:00
parent a503a02663
commit 281ee18400

View file

@ -86,10 +86,10 @@ $output = qx{../src/task rc:abbrev.rc ver 2>&1};
like ($output, qr/MIT\s+license/, 'version'); like ($output, qr/MIT\s+license/, 'version');
$output = qx{../src/task rc:abbrev.rc ve 2>&1}; $output = qx{../src/task rc:abbrev.rc ve 2>&1};
unlike ($output, qr/MIT\s+license/, 'version'); like ($output, qr/MIT\s+license/, 'version');
$output = qx{../src/task rc:abbrev.rc v 2>&1}; $output = qx{../src/task rc:abbrev.rc v 2>&1};
unlike ($output, qr/MIT\s+license/, 'version'); like ($output, qr/MIT\s+license/, 'version');
# Cleanup. # Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data abbrev.rc); unlink qw(pending.data completed.data undo.data backlog.data abbrev.rc);