diff --git a/t/AuthoritiesMarc_UNIMARC.t b/t/AuthoritiesMarc_UNIMARC.t index 0a55cd63f1..4d26f3948b 100755 --- a/t/AuthoritiesMarc_UNIMARC.t +++ b/t/AuthoritiesMarc_UNIMARC.t @@ -6,9 +6,11 @@ use strict; use warnings; -use Test::More tests => 1; +use Test::More tests => 2; BEGIN { use_ok('C4::AuthoritiesMarc::UNIMARC'); } +my @test = C4::AuthoritiesMarc::UNIMARC::default_auth_type_location(); +ok(($test[0] == 152) && ($test[1] eq 'b'), "correct variables being returned");