Unit Tests - improved logic in nag.t
- Used the correct builtin Test::More method.
This commit is contained in:
@@ -52,7 +52,7 @@ like (qx{../task rc:nag.rc do 5}, qr/NAG/, 'do pri:L -> nag');
|
|||||||
like (qx{../task rc:nag.rc do 4}, qr/NAG/, 'do pri:M-> nag');
|
like (qx{../task rc:nag.rc do 4}, qr/NAG/, 'do pri:M-> nag');
|
||||||
like (qx{../task rc:nag.rc do 3}, qr/NAG/, 'do pri:H-> nag');
|
like (qx{../task rc:nag.rc do 3}, qr/NAG/, 'do pri:H-> nag');
|
||||||
like (qx{../task rc:nag.rc do 2}, qr/NAG/, 'do due:tomorrow -> nag');
|
like (qx{../task rc:nag.rc do 2}, qr/NAG/, 'do due:tomorrow -> nag');
|
||||||
ok (qx{../task rc:nag.rc do 1} !~ qr/NAG/, 'do due:yesterday -> no nag');
|
unlike (qx{../task rc:nag.rc do 1}, qr/NAG/, 'do due:yesterday -> no nag');
|
||||||
|
|
||||||
# Cleanup.
|
# Cleanup.
|
||||||
unlink 'pending.data';
|
unlink 'pending.data';
|
||||||
|
|||||||
Reference in New Issue
Block a user