|
Lines 22-27
use Modern::Perl;
Link Here
|
| 22 |
use Test::More tests => 20; |
22 |
use Test::More tests => 20; |
| 23 |
use Data::Dumper; |
23 |
use Data::Dumper; |
| 24 |
use Koha::Database; |
24 |
use Koha::Database; |
|
|
25 |
use t::lib::Mocks; |
| 25 |
|
26 |
|
| 26 |
BEGIN { |
27 |
BEGIN { |
| 27 |
use_ok('Koha::ItemType'); |
28 |
use_ok('Koha::ItemType'); |
|
Lines 114-119
is( $type->summary, 'summary', 'summary' );
Link Here
|
| 114 |
is( $type->checkinmsg, 'checkinmsg', 'checkinmsg' ); |
115 |
is( $type->checkinmsg, 'checkinmsg', 'checkinmsg' ); |
| 115 |
is( $type->checkinmsgtype, 'checkinmsgtype', 'checkinmsgtype' ); |
116 |
is( $type->checkinmsgtype, 'checkinmsgtype', 'checkinmsgtype' ); |
| 116 |
|
117 |
|
|
|
118 |
t::lib::Mocks::mock_preference('language', 'en'); |
| 119 |
t::lib::Mocks::mock_preference('opaclanguages', 'en'); |
| 117 |
my $itemtypes = Koha::ItemTypes->search_with_localization; |
120 |
my $itemtypes = Koha::ItemTypes->search_with_localization; |
| 118 |
is( $itemtypes->count, 3, 'There are 3 item types' ); |
121 |
is( $itemtypes->count, 3, 'There are 3 item types' ); |
| 119 |
my $first_itemtype = $itemtypes->next; |
122 |
my $first_itemtype = $itemtypes->next; |
| 120 |
- |
|
|