Continuing to add tests
[koha.git] / t / Acquisition.t
1 BEGIN { $| = 1; print "1..3\n"; }
2 END {print "not ok 1\n" unless $loaded;}
3 use C4::Acquisition;
4 $loaded = 1;
5 print "ok 1\n";
6
7 $basketno=NewBasket(1,1);
8 if ($basketno){
9   print "ok 2\n";
10 }
11 else {
12   print "not ok 2\n";
13 }
14
15 if ($basket=GetBasket($basketno)){
16   print "ok 3\n";
17 }
18 else {
19   print "not ok 3\n";
20 }