Bug Fix - export

- Fixed export bug that was emitting quoted blank strings, instead of
  blank strings.
- Fixed undo.t unit tests.
This commit is contained in:
Paul Beckingham 2009-06-18 22:52:27 -04:00
parent 456a493ab5
commit cea84b3d3b
4 changed files with 49 additions and 19 deletions

View file

@ -45,19 +45,19 @@ ok (-r 'pending.data', 'pending.data created');
like ($output, qr/Status\s+Pending\n/, 'Pending');
$output = qx{../task rc:undo.rc do 1; ../task rc:undo.rc info 1};
ok (! -r 'completed.data', 'completed.data not created');
ok (-r 'completed.data', 'completed.data created');
like ($output, qr/Status\s+Completed\n/, 'Completed');
$output = qx{../task rc:undo.rc undo 1; ../task rc:undo.rc info 1};
ok (! -r 'completed.data', 'completed.data not created');
ok (-r 'completed.data', 'completed.data created');
like ($output, qr/Status\s+Pending\n/, 'Pending');
$output = qx{../task rc:undo.rc do 1; ../task rc:undo.rc list};
like ($output, qr/^No matches/, 'No matches');
like ($output, qr/No matches/, 'No matches');
$output = qx{../task rc:undo.rc undo 1; ../task rc:undo.rc info 1};
like ($output, qr/Task 1 not found/, 'Task 1 not found');
like ($output, qr/No matches/, 'No matches');
like ($output, qr/Task 1 not found/, 'No matches');
# Cleanup.
ok (-r 'pending.data', 'Need to remove pending.data');