Unit Tests - next.t

- Tests no longer assume that a set of added tasks will show an age
  of /-/, and now uses /(:?-|\d secs?)/.
This commit is contained in:
Paul Beckingham 2010-02-16 07:38:15 -05:00
parent e923282181
commit ad7abec3d7

View file

@ -47,8 +47,8 @@ qx{../task rc:next.rc add project:B priority:H BH};
qx{../task rc:next.rc add project:B Bnone}; qx{../task rc:next.rc add project:B Bnone};
my $output = qx{../task rc:next.rc next}; my $output = qx{../task rc:next.rc next};
like ($output, qr/\s1\sA\s+H\s+-\sAH\n/, 'AH shown'); like ($output, qr/\s1\sA\s+H\s+(?:-|\d secs?)\sAH\n/, 'AH shown');
like ($output, qr/\s3\sB\s+H\s+-\sBH\n/, 'BH shown'); like ($output, qr/\s3\sB\s+H\s+(?:-|\d secs?)\sBH\n/, 'BH shown');
# Cleanup. # Cleanup.
unlink 'pending.data'; unlink 'pending.data';