X-Git-Url: https://git.donarmstrong.com/?p=deb_pkgs%2Flibhtml-calendarmonth-perl.git;a=blobdiff_plain;f=t%2F06_cal.t;h=b2807a9f5af93fee38cdf5e44c1b3525cb8b5c1c;hp=547113c449ec94bbd8997d4fc0aaad8ded6489ef;hb=f3ef12e10123e46a0db95d820bb77f6e6d3225c7;hpb=febd0b02136ed777f42c0e2b79d71db21c1805a8 diff --git a/t/06_cal.t b/t/06_cal.t index 547113c..b2807a9 100755 --- a/t/06_cal.t +++ b/t/06_cal.t @@ -7,14 +7,20 @@ use lib $FindBin::RealBin; use testload; my($test_count, $method); -BEGIN { $test_count = case_count() + 2 ; $method = 'cal' } +BEGIN { + $method = 'cal'; + $test_count = bulk_count() + odd_count() + 3; +} use Test::More tests => $test_count; +use constant DTC => 'HTML::CalendarMonth::DateTool'; + +use_ok(DTC); + SKIP: { - my $CAL; - chomp($CAL = `which cal`); - skip("$method not installed", $test_count) unless -x $CAL; + skip("$method not installed", $test_count - 1) unless DTC->_cal_cmd; check_datetool($method); - check_basic_with_datetool($method); + check_bulk_with_datetool($method); + check_odd_with_datetool($method); }