Merge branch 'test_cases' of /home/koha/koha1/dev into to-push

This commit is contained in:
Galen Charlton 2010-10-06 09:23:42 -04:00
commit 5aced408c6

View file

@ -1,19 +1,15 @@
BEGIN { $| = 1; print "1..2\n"; } #!/usr/bin/perl
END {print "not ok 1\n" unless $loaded;} use strict;
use C4::Koha; use warnings;
$loaded = 1;
print "ok 1\n"; use Test::More tests => 2;
use_ok('C4::Koha');
# #
# test that &slashifyDate returns correct (non-US) date # test that &slashifyDate returns correct (non-US) date
# #
$date = "01/01/2002"; my $date = "01/01/2002";
$newdate = &slashifyDate("2002-01-01"); my $newdate = &slashifyDate("2002-01-01");
if ($date eq $newdate) {
print "ok 2\n";
} else {
print "not ok 2\n";
}
ok($date eq $newdate, 'slashifyDate');