Code Cleanup

- 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

View File

@@ -47,7 +47,7 @@ qx{../src/task rc:pri.rc add one pri:H};
qx{../src/task rc:pri.rc add two pri:M};
qx{../src/task rc:pri.rc add three pri:L};
my $output = qx{../src/task rc:pri.rc foo 2>&1};
my $output = qx{../src/task rc:pri.rc foo};
like ($output, qr/ID.+Pri/, 'priority.long indicator heading');
like ($output, qr/1\s+High/, 'priority.long High');
like ($output, qr/2\s+Medium/, 'priority.long Medium');