File Coverage

File:t/AuthoritiesMarc_UNIMARC.t
Coverage:89.5%

linestmtbrancondsubtimecode
1#!/usr/bin/perl
2#
3# This Koha test module is a stub!
4# Add more tests here!!!
5
6
1
1
1
1
1.33283517821402e+15
3
24
use strict;
7
1
1
1
1
4
1
34
use warnings;
8
9
1
1
1
1
357
19827
11
use Test::More tests => 2;
10
11BEGIN {
12
1
1
2056
        use_ok('C4::AuthoritiesMarc::UNIMARC');
13}
14
15
1
192988
my @test = C4::AuthoritiesMarc::UNIMARC::default_auth_type_location();
16
1
33
20
ok(($test[0] == 152) && ($test[1] eq 'b'), "correct variables being returned");