View | Details | Raw Unified | Return to bug 11543
Collapse All | Expand All

(-)a/t/Category.t (-14 lines)
Lines 1-14 Link Here
1
#!/usr/bin/perl
2
#
3
# This Koha test module is a stub!  
4
# Add more tests here!!!
5
6
use strict;
7
use warnings;
8
9
use Test::More tests => 1;
10
11
BEGIN {
12
        use_ok('C4::Category');
13
}
14
(-)a/t/db_dependent/Category.t (-1 / +24 lines)
Line 0 Link Here
0
- 
1
#!/usr/bin/perl
2
#
3
# This Koha test module is a stub!  
4
# Add more tests here!!!
5
6
use strict;
7
use warnings;
8
9
use Test::More tests => 2;
10
11
BEGIN {
12
        use_ok('C4::Category');
13
}
14
use C4::Context;
15
my $dbh = C4::Context->dbh;
16
$dbh->{RaiseError} = 1;
17
$dbh->{AutoCommit} = 0;
18
19
my $sth=$dbh->prepare("INSERT INTO categories  (categorycode,description,enrolmentperiod,enrolmentperioddate,upperagelimit,dateofbirthrequired,
20
enrolmentfee,reservefee,hidelostitems,overduenoticerequired,category_type) values (?,?,?,?,?,?,?,?,?,?,?)");
21
$sth->execute("test", "Desc", 12, "2014-01-02", 99, 1, 1.5, 2.5, 0, 0, "A") || die $sth->errstr;
22
ok( my @categories = C4::Category->all);
23
24
$dbh->rollback;

Return to bug 11543