Finalized XML version for intranet
[koha.git] / koha.t
1 BEGIN { $| = 1; print "1..2\n"; }
2 END {print "not ok 1\n" unless $loaded;}
3 use C4::Koha;
4 $loaded = 1;
5 print "ok 1\n";
6
7 $date = "01/01/2002";
8 $newdate = &slashifyDate("2002-01-01");
9
10 if ($date eq $newdate) {
11     print "ok 2\n";
12 } else {
13     print "not ok 2\n";
14 }