Bug 24157: New permission - merge_invoices

[srvgit] / t / Biblio.t

diff --git a/t/Biblio.t b/t/Biblio.t
index 4400017..0550ce7 100755 (executable)
--- a/t/Biblio.t
+++ b/t/Biblio.t
@@ -21,7 +21,7 @@ use Test::More;
 use Test::MockModule;
 use Test::Warn;
 
-plan tests => 45;
+plan tests => 43;
 
 use_ok('C4::Biblio');
 
@@ -51,12 +51,6 @@ warning_is { $ret = BiblioAutoLink(undef, q{}) }
 
 is( $ret, 0, 'BiblioAutoLink returns zero if not passed rec');
 
-warning_is { $ret = GetRecordValue('100', undef) }
-           { carped => 'GetRecordValue called with undefined record'},
-           "GetRecordValue returns carped warning on undef record";
-
-ok( !defined $ret, 'GetRecordValue returns undef if not passed rec');
-
 warning_is { @arr = LinkBibHeadingsToAuthorities(q{}, q{}) }
            { carped => 'LinkBibHeadingsToAuthorities called on undefined bib record'},
            "LinkBibHeadingsToAuthorities returns carped warning on undef record";