Unit Tests

- Improved args.5.t, which was attempting to stop tasks that were
  not started.
This commit is contained in:
Paul Beckingham 2011-07-10 18:04:49 -04:00
parent d5849b0160
commit 8e0296468e
4 changed files with 18 additions and 3 deletions

View file

@ -46,6 +46,12 @@ qx{../src/task rc:args.rc add three};
qx{../src/task rc:args.rc add four};
qx{../src/task rc:args.rc add five};
qx{../src/task rc:args.rc 1 start};
qx{../src/task rc:args.rc 2 start};
qx{../src/task rc:args.rc 3 start};
qx{../src/task rc:args.rc 4 start};
qx{../src/task rc:args.rc 5 start};
qx{../src/task rc:args.rc 1 stop oneanno};
my $output = qx{../src/task rc:args.rc 1 info};
like ($output, qr/oneanno/, 'stop enpassant anno');