Unit Tests

- Modified a test that relies on an obsolete message.
This commit is contained in:
Paul Beckingham 2014-05-29 23:17:02 -04:00
parent 5baa999459
commit da95c16da9

View file

@ -45,10 +45,10 @@ if (open my $fh, '>', 'outerr.rc')
# error
# Check that errors are sent to standard error
my $stdout = qx{../src/task rc:outerr.rc add due:__ foo 2> /dev/null};
unlike ($stdout, qr/^The duration '__' was not recognized as valid, with correct units like '3days'.$/ms, 'Errors are not sent to stdout');
my $stderr = qx{../src/task rc:outerr.rc add due:__ bar 2>&1 >/dev/null};
like ($stderr, qr/^The duration '__' was not recognized as valid, with correct units like '3days'.$/ms, 'Errors are sent to stderr');
my $stdout = qx{../src/task rc:outerr.rc add 2> /dev/null};
unlike ($stdout, qr/^Additional text must be provided\.$/ms, 'Errors are not sent to stdout');
my $stderr = qx{../src/task rc:outerr.rc add 2>&1 >/dev/null};
like ($stderr, qr/^Additional text must be provided\.$/ms, 'Errors are sent to stderr');
# Check that headers are sent to standard error
$stdout = qx{../src/task rc:outerr.rc list 2> /dev/null};