Bug 26497: "Hide all columns" throws Javascript error on aqplan.pl
[koha.git] / t / Koha / Z3950responder.t
blob7f2219783b3ae8dd9c7b0a3ad534b089487c260c
1 #!/usr/bin/perl
3 use Modern::Perl;
4 use Test::More tests => 2;
6 BEGIN {
7 use_ok('Koha::Z3950Responder');
10 my $zR = Koha::Z3950Responder->new({});
12 my $args = { PEER_NAME => 'PEER' };
13 $zR->init_handler($args);
14 is ( $args->{IMP_NAME}, 'Koha', 'Server returns basic info' );