From 2b44d513e87ac69c350f95923c64a0eef5e15dbc Mon Sep 17 00:00:00 2001 From: Federico Hernandez Date: Wed, 2 Dec 2009 00:28:34 +0100 Subject: [PATCH] Added unit tests for bug fix #333 --- src/tests/duplicate.t | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/src/tests/duplicate.t b/src/tests/duplicate.t index 19ea26911..f148e7b03 100755 --- a/src/tests/duplicate.t +++ b/src/tests/duplicate.t @@ -28,7 +28,7 @@ use strict; use warnings; -use Test::More tests => 12; +use Test::More tests => 15; # Create the rc file. if (open my $fh, '>', 'dup.rc') @@ -55,6 +55,12 @@ like ($output, qr/Description\s+FOO/, 'duplicate modified description'); like ($output, qr/Priority\s+H/, 'duplicate added priority'); like ($output, qr/Tags\s+tag/, 'duplicate added tag'); +# Test the output of the duplicate command - returning id of duplicated task +$output = qx{../task rc:dup.rc duplicate 1}; +like ($output, qr/Duplicated\s+1\s+'foo'/, 'duplicate output task id and description'); +like ($output, qr/Duplicated\s+1\s+task/, 'duplicate output number of tasks duplicated'); +like ($output, qr/Created\s+task\s+4/, 'duplicate output of new task id'); + # Cleanup. unlink 'pending.data'; ok (!-r 'pending.data', 'Removed pending.data');