gergely/taskwarrior-2.x
1
0
Fork 0
Code Issues Actions Packages Projects Releases 1 Wiki Activity

Code Cleanup

Browse Source 
- More specific test (checking message either in the standard output or the
  standard error).
This commit is contained in:
Louis-Claude Canon
2012-06-16 17:20:54 +02:00
committed by Paul Beckingham
parent e5fe704f6a
commit 1e632fea66
5 changed files with 33 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

54
test/bug.cal.t
View File

@@ -42,65 +42,65 @@ if (open my $fh, '>', 'cal.rc')
# Bug: The 'cal' command can fail when provided with challenging arguments.
# Should not fail (because they are correct):
my $output = qx{../src/task rc:cal.rc cal 2>&1};
my $output = qx{../src/task rc:cal.rc cal 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal');
# y due 2010 donkey 8
$output = qx{../src/task rc:cal.rc cal y 2>&1};
$output = qx{../src/task rc:cal.rc cal y 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y');
$output = qx{../src/task rc:cal.rc cal 8 2>&1};
$output = qx{../src/task rc:cal.rc cal 8 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 8');
$output = qx{../src/task rc:cal.rc cal due 2>&1};
$output = qx{../src/task rc:cal.rc cal due 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal due');
$output = qx{../src/task rc:cal.rc cal 2010 2>&1};
$output = qx{../src/task rc:cal.rc cal 2010 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 2010');
$output = qx{../src/task rc:cal.rc cal donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal donkey');
# y due 2010 donkey 8
$output = qx{../src/task rc:cal.rc cal y due 2>&1};
$output = qx{../src/task rc:cal.rc cal y due 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y due');
$output = qx{../src/task rc:cal.rc cal y 8 2>&1};
$output = qx{../src/task rc:cal.rc cal y 8 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y 8');
$output = qx{../src/task rc:cal.rc cal y 2010 2>&1};
$output = qx{../src/task rc:cal.rc cal y 2010 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y 2010');
$output = qx{../src/task rc:cal.rc cal y donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal y donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y donkey');
$output = qx{../src/task rc:cal.rc cal 8 due 2>&1};
$output = qx{../src/task rc:cal.rc cal 8 due 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 8 due');
$output = qx{../src/task rc:cal.rc cal 8 2010 2>&1};
$output = qx{../src/task rc:cal.rc cal 8 2010 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 8 2010');
$output = qx{../src/task rc:cal.rc cal 8 donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal 8 donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 8 donkey');
$output = qx{../src/task rc:cal.rc cal due 2010 2>&1};
$output = qx{../src/task rc:cal.rc cal due 2010 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal due 2010');
$output = qx{../src/task rc:cal.rc cal due donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal due donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal due donkey');
$output = qx{../src/task rc:cal.rc cal 2010 donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal 2010 donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 2010 donkey');
# y 8 due 2010 donkey
$output = qx{../src/task rc:cal.rc cal y 8 due 2>&1};
$output = qx{../src/task rc:cal.rc cal y 8 due 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y 8 due');
$output = qx{../src/task rc:cal.rc cal y 8 2010 2>&1};
$output = qx{../src/task rc:cal.rc cal y 8 2010 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y 8 2010');
$output = qx{../src/task rc:cal.rc cal y 8 donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal y 8 donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y 8 donkey');
$output = qx{../src/task rc:cal.rc cal y due 2010 2>&1};
$output = qx{../src/task rc:cal.rc cal y due 2010 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y due 2010');
$output = qx{../src/task rc:cal.rc cal y due donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal y due donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y due donkey');
$output = qx{../src/task rc:cal.rc cal y 2010 donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal y 2010 donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal y 2010 donkey');
$output = qx{../src/task rc:cal.rc cal 8 due 2010 2>&1};
$output = qx{../src/task rc:cal.rc cal 8 due 2010 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 8 due 2010');
$output = qx{../src/task rc:cal.rc cal 8 due donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal 8 due donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 8 due donkey');
$output = qx{../src/task rc:cal.rc cal 8 2010 donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal 8 2010 donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal 8 2010 donkey');
$output = qx{../src/task rc:cal.rc cal due 2010 8 2>&1};
$output = qx{../src/task rc:cal.rc cal due 2010 8 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal due 2010 8');
$output = qx{../src/task rc:cal.rc cal due 2010 donkey 2>&1};
$output = qx{../src/task rc:cal.rc cal due 2010 donkey 2>&1 >/dev/null};
unlike ($output, qr/(?:Assertion failed|Could note recognize|not a valid)/, 'cal due 2010 donkey');
# Cleanup.