Bug 31634: Add part_number and part_name in opac result browser
[koha.git] / t / Koha / Z3950responder.t
1 #!/usr/bin/perl
2
3 use Modern::Perl;
4 use Test::More tests => 2;
5
6 BEGIN {
7     use_ok('Koha::Z3950Responder');
8 }
9
10 my $zR = Koha::Z3950Responder->new({});
11
12 my $args = { PEER_NAME => 'PEER' };
13 $zR->init_handler($args);
14 is ( $args->{IMP_NAME}, 'Koha', 'Server returns basic info' );