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

(-)a/t/Koha/ItemType.t (-9 / +12 lines)
Lines 19-38 Link Here
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
22
use Test::More tests => 8;
22
use Test::More tests => 10;
23
23
24
BEGIN {
24
BEGIN {
25
    use_ok('Koha::ItemType');
25
    use_ok('Koha::ItemType');
26
}
26
}
27
27
28
my $data = {
28
my $data = {
29
    itemtype       => 'CODE',
29
    itemtype        => 'CODE',
30
    description    => 'description',
30
    description     => 'description',
31
    rentalcharge   => 'rentalcharge',
31
    rentalcharge    => 'rentalcharge',
32
    imageurl       => 'imageurl',
32
    imageurl        => 'imageurl',
33
    summary        => 'summary',
33
    summary         => 'summary',
34
    checkinmsg     => 'checkinmsg',
34
    checkinmsg      => 'checkinmsg',
35
    checkinmsgtype => 'checkinmsgtype',
35
    checkinmsgtype  => 'checkinmsgtype',
36
    checkoutmsg     => 'checkoutmsg',
37
    checkoutmsgtype => 'checkoutmsgtype',
36
};
38
};
37
39
38
my $type = Koha::ItemType->new($data);
40
my $type = Koha::ItemType->new($data);
Lines 44-46 is( $type->imageurl, 'imageurl', 'imageurl' ); Link Here
44
is( $type->summary,        'summary',        'summary' );
46
is( $type->summary,        'summary',        'summary' );
45
is( $type->checkinmsg,     'checkinmsg',     'checkinmsg' );
47
is( $type->checkinmsg,     'checkinmsg',     'checkinmsg' );
46
is( $type->checkinmsgtype, 'checkinmsgtype', 'checkinmsgtype' );
48
is( $type->checkinmsgtype, 'checkinmsgtype', 'checkinmsgtype' );
47
- 
49
is( $type->checkoutmsg,     'checkoutmsg',     'checkoutmsg' );
50
is( $type->checkoutmsgtype, 'checkoutmsgtype', 'checkoutmsgtype' );

Return to bug 32485