diff options
| author | fukachan <fukachan> | 2012-02-25 13:05:43 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2012-02-25 13:05:43 +0000 |
| commit | a95519876afedd4e0b87af5561c83fdca4d9a825 (patch) | |
| tree | 7a3a1c23938a5913424f55e3ecadd4bb088bb5ce | |
| parent | fb8f5305170640cdad168678a2b3925a29cc80bb (diff) | |
| download | fml8-a95519876afedd4e0b87af5561c83fdca4d9a825.tar.gz fml8-a95519876afedd4e0b87af5561c83fdca4d9a825.tar.bz2 fml8-a95519876afedd4e0b87af5561c83fdca4d9a825.zip | |
Initial revision
| -rw-r--r-- | cpan/dist/HTML-CalendarMonthSimple/test.pl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/cpan/dist/HTML-CalendarMonthSimple/test.pl b/cpan/dist/HTML-CalendarMonthSimple/test.pl new file mode 100644 index 00000000..d0e89318 --- /dev/null +++ b/cpan/dist/HTML-CalendarMonthSimple/test.pl @@ -0,0 +1,16 @@ +# Before `make install' is performed this script should be runnable with +# `make test'. After `make install' it should work as `perl test.pl' + +######################### We start with some black magic to print on failure. + +END {print "not ok 1\n" unless $loaded;} +use HTML::CalendarMonthSimple; +$loaded = 1; +print "ok 1\n"; + +######################### End of black magic. + +# test instantiation of a new calendar object +my $cal = new HTML::CalendarMonthSimple(); +if ($cal) { print "ok 2\n"; } else { die "not ok 2\n"; } + |