repo.or.cz
/
koha.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
*** empty log message ***
[koha.git]
/
koha.t
blob
b0b7e925c0186bac1373cdf54991f7efd8f6d19e
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
}