From e81fdd19758e6e04d7764bbf9ace1ed1926e2f75 Mon Sep 17 00:00:00 2001
From: Paul Beckingham <paul@beckingham.net>
Date: Sat, 9 May 2009 14:03:54 -0400
Subject: [PATCH] Unit Tests - improved logic in nag.t

- Used the correct builtin Test::More method.
---
 src/tests/nag.t | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/tests/nag.t b/src/tests/nag.t
index d55aac456..398250514 100755
--- a/src/tests/nag.t
+++ b/src/tests/nag.t
@@ -47,12 +47,12 @@ my $setup = "../task rc:nag.rc add due:yesterday one;"
           . "../task rc:nag.rc add six;";
 qx{$setup};
 
-like (qx{../task rc:nag.rc do 6}, qr/NAG/, 'do pri: -> nag');
-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 3}, qr/NAG/, 'do pri:H-> 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');
+like   (qx{../task rc:nag.rc do 6}, qr/NAG/, 'do pri: -> nag');
+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 3}, qr/NAG/, 'do pri:H-> nag');
+like   (qx{../task rc:nag.rc do 2}, qr/NAG/, 'do due:tomorrow -> nag');
+unlike (qx{../task rc:nag.rc do 1}, qr/NAG/, 'do due:yesterday -> no nag');
 
 # Cleanup.
 unlink 'pending.data';