gergely/taskwarrior-2.x
1
0
Fork 0
Code Issues Actions Packages Projects Releases 1 Wiki Activity

Import todo.sh

Browse Source 
- Added more unit tests to todo.sh import.
This commit is contained in:
Paul Beckingham
2011-09-01 00:04:18 -04:00
parent c1a21ce5a4
commit e0ee80b1a9
1 changed files with 30 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

45
test/import.todo.sh.t
View File

@@ -28,7 +28,7 @@
use strict; use strict;
use warnings; use warnings;
use Test::More tests => 11; use Test::More tests => 26;
# Create the rc file. # Create the rc file.
if (open my $fh, '>', 'import.rc') if (open my $fh, '>', 'import.rc')
@@ -44,20 +44,20 @@ if (open my $fh, '>', 'import.rc')
# Create import file. # Create import file.
if (open my $fh, '>', 'import.txt') if (open my $fh, '>', 'import.txt')
{ {
print $fh "(A) \@phone thank Mom for the meatballs\n", print $fh "(A) \@phone thank Mom for the meatballs\n", # 1
"(B) +GarageSale \@phone schedule Goodwill pickup\n", "(B) +GarageSale \@phone schedule Goodwill pickup\n", # 2
"+GarageSale \@home post signs around the neighborhood\n", "+GarageSale \@home post signs around the neighborhood\n", # 3
"\@shopping Eskimo pies\n", "\@shopping Eskimo pies\n", # 4
"(A) Call Mom\n", "(A) Call Mom\n", # 5
"Really gotta call Mom (A) \@phone \@someday\n", "Really gotta call Mom (A) \@phone \@someday\n", # 6
"(b)->get back to the boss\n", "(b)->get back to the boss\n", # 7
"2011-03-02 Document +TodoTxt task format\n", "2011-03-02 Document +TodoTxt task format\n", # 8
"(A) 2011-03-02 Call Mom\n", "(A) 2011-03-02 Call Mom\n", # 9
"(A) Call Mom 2011-03-02\n", "(A) Call Mom 2011-03-02\n", # 10
"(A) Call Mom +Family +PeaceLoveAndHappiness \@iphone \@phone\n", "(A) Call Mom +Family +PeaceLoveAndHappiness \@iphone \@phone\n", # 11
"xylophone lesson\n", "xylophone lesson\n", # 12
"X 2011-03-03 Call Mom\n", "X 2011-03-03 Call Mom\n", # -
"x 2011-03-02 2011-03-01 Review Tim's pull request +TodoTxtTouch \@github\n"; "x 2011-03-02 2011-03-01 Review Tim's pull request +TodoTxtTouch \@github\n"; # -
close $fh; close $fh;
ok (-r 'import.txt', 'Created sample import data'); ok (-r 'import.txt', 'Created sample import data');
@@ -77,30 +77,45 @@ like ($output, qr/^Description.+\@phone thank Mom for the meatballs/ms, '1 <desc
$output = qx{../src/task rc:import.rc info 2}; $output = qx{../src/task rc:import.rc info 2};
like ($output, qr/^Priority.+M/ms, '2 pri:M'); like ($output, qr/^Priority.+M/ms, '2 pri:M');
like ($output, qr/^Project.+GarageSale/ms, '2 <project>');
like ($output, qr/^Description.+/ms, '2 <desc>');
$output = qx{../src/task rc:import.rc info 3}; $output = qx{../src/task rc:import.rc info 3};
like ($output, qr/^Project.+GarageSale/ms, '3 <project>');
like ($output, qr/^Description.+\+GarageSale \@home post signs around the neighborhood/ms, '3 <desc>');
$output = qx{../src/task rc:import.rc info 4}; $output = qx{../src/task rc:import.rc info 4};
like ($output, qr/^Description.+\@shopping Eskimo pies/ms, '4 <desc>');
$output = qx{../src/task rc:import.rc info 5}; $output = qx{../src/task rc:import.rc info 5};
like ($output, qr/^Priority.+H/ms, '5 pri:H'); like ($output, qr/^Priority.+H/ms, '5 pri:H');
like ($output, qr/^Description.+Call Mom/ms, '5 <desc>');
$output = qx{../src/task rc:import.rc info 6}; $output = qx{../src/task rc:import.rc info 6};
like ($output, qr/^Description.+Really gotta call Mom \(A\) \@phone \@someday/ms, '6 <desc>');
$output = qx{../src/task rc:import.rc info 7}; $output = qx{../src/task rc:import.rc info 7};
like ($output, qr/^Description.+\(b\)->get back to the boss/ms, '7 <desc>');
$output = qx{../src/task rc:import.rc info 8}; $output = qx{../src/task rc:import.rc info 8};
like ($output, qr/^Project.+TodoTxt/ms, '8 <project>');
like ($output, qr/^Description.+Document \+TodoTxt task format/ms, '8 <desc>');
$output = qx{../src/task rc:import.rc info 9}; $output = qx{../src/task rc:import.rc info 9};
like ($output, qr/^Priority.+H/ms, '9 pri:H'); like ($output, qr/^Priority.+H/ms, '9 pri:H');
like ($output, qr/^Description.+Call Mom/ms, '9 <desc>');
$output = qx{../src/task rc:import.rc info 10}; $output = qx{../src/task rc:import.rc info 10};
like ($output, qr/^Priority.+H/ms, '10 pri:H'); like ($output, qr/^Priority.+H/ms, '10 pri:H');
like ($output, qr/^Description.+Call Mom 2011-03-02/ms, '10 <desc>');
$output = qx{../src/task rc:import.rc info 11}; $output = qx{../src/task rc:import.rc info 11};
like ($output, qr/^Priority.+H/ms, '11 pri:H'); like ($output, qr/^Priority.+H/ms, '11 pri:H');
like ($output, qr/^Project.+Family/ms, '8 <project>');
like ($output, qr/^Description.+Call Mom \+Family \+PeaceLoveAndHappiness \@iphone \@phone/ms, '11 <desc>');
$output = qx{../src/task rc:import.rc info 12}; $output = qx{../src/task rc:import.rc info 12};
like ($output, qr/^Description.+xylophone lesson/ms, '12 <desc>');
# TODO and now the completed ones. # TODO and now the completed ones.