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

Unit Tests

Browse Source 
- Calendar command needs to be explicit (because calendar/calc share the first
  three letters).
This commit is contained in:
Paul Beckingham
2014-05-11 14:33:49 -04:00
parent 8f02fb1b13
commit 980ab680f3
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
test/cal.t
View File

@@ -67,7 +67,7 @@ if ($day <= 9)
$day = " ".$day; $day = " ".$day;
} }
# task cal and task cal y # task calendar and task calendar y
my $output = qx{../src/task rc:cal.rc rc._forcecolor:on calendar 2>&1}; my $output = qx{../src/task rc:cal.rc rc._forcecolor:on calendar 2>&1};
if ($wday == 6 || $wday == 0) if ($wday == 6 || $wday == 0)
{ {
@@ -98,7 +98,7 @@ if ($month eq "Jan")
} }
unlike ($output, qr/$month\S*?\s+?$nextyear/, 'Current month and year ahead are not displayed'); unlike ($output, qr/$month\S*?\s+?$nextyear/, 'Current month and year ahead are not displayed');
# task cal due and task cal due y # task calendar due and task calendar due y
qx{../src/task rc:cal.rc add due:20190515 one 2>&1}; qx{../src/task rc:cal.rc add due:20190515 one 2>&1};
qx{../src/task rc:cal.rc add due:20200123 two 2>&1}; qx{../src/task rc:cal.rc add due:20200123 two 2>&1};
$output = qx{../src/task rc:cal.rc rc._forcecolor:on calendar due 2>&1}; $output = qx{../src/task rc:cal.rc rc._forcecolor:on calendar due 2>&1};
@@ -120,7 +120,7 @@ like ($output, qr/37;100m19/, 'Saturday April 19, 2008 is color-coded');
like ($output, qr/37;100m20/, 'Sunday April 20, 2008 is color-coded'); like ($output, qr/37;100m20/, 'Sunday April 20, 2008 is color-coded');
like ($output, qr/30;47m 1/, 'Weeknumbers are color-coded'); like ($output, qr/30;47m 1/, 'Weeknumbers are color-coded');
# task cal 2016 # task calendar 2016
$output = qx{../src/task rc:cal.rc rc.weekstart:Monday calendar 2016 2>&1}; $output = qx{../src/task rc:cal.rc rc.weekstart:Monday calendar 2016 2>&1};
unlike ($output, qr/2015/, 'Year 2015 is not displayed'); unlike ($output, qr/2015/, 'Year 2015 is not displayed');
unlike ($output, qr/2017/, 'Year 2017 is not displayed'); unlike ($output, qr/2017/, 'Year 2017 is not displayed');
@@ -136,7 +136,7 @@ like ($output, qr/53 +25/, 'Last week in 2016 starts with Sun Dec 25 (
$output = qx{../src/task rc:cal.rc rc.weekstart:Monday rc.displayweeknumber:off calendar 2016 2>&1}; $output = qx{../src/task rc:cal.rc rc.weekstart:Monday rc.displayweeknumber:off calendar 2016 2>&1};
unlike ($output, qr/53/, 'Weeknumbers are not displayed'); unlike ($output, qr/53/, 'Weeknumbers are not displayed');
# task cal 4 2010 # task calendar 4 2010
$output = qx{../src/task rc:cal.rc rc.monthsperline:1 calendar 4 2010 2>&1}; $output = qx{../src/task rc:cal.rc rc.monthsperline:1 calendar 4 2010 2>&1};
unlike ($output, qr/March 2010/, 'March 2010 is not displayed'); unlike ($output, qr/March 2010/, 'March 2010 is not displayed');
like ($output, qr/April 2010/, 'April 2010 is displayed'); like ($output, qr/April 2010/, 'April 2010 is displayed');