From ef5b0fc8819ac9328736ecb2a3d7cf9514aa21f9 Mon Sep 17 00:00:00 2001 From: kados Date: Sun, 26 Feb 2006 00:12:51 +0000 Subject: [PATCH] Don't need those $Zconn's after all. --- cataloguing/addbiblio.pl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/cataloguing/addbiblio.pl b/cataloguing/addbiblio.pl index 16e663a7d8..b18e97b5ed 100755 --- a/cataloguing/addbiblio.pl +++ b/cataloguing/addbiblio.pl @@ -354,7 +354,6 @@ my $z3950 = $input->param('z3950'); my $op = $input->param('op'); my $frameworkcode = $input->param('frameworkcode'); my $dbh = C4::Context->dbh; -my $Zconn = C4::Context->Zconn; $frameworkcode = &MARCfind_frameworkcode($dbh,$biblionumber) if ($biblionumber and not ($frameworkcode)); $frameworkcode='' if ($frameworkcode eq 'Default'); @@ -433,7 +432,7 @@ if ($op eq "addbiblio") { if ($is_a_modif) { warn "ITS A MODIF : .$biblionumber"; NEWmodbiblioframework($dbh,$biblionumber,$frameworkcode); - NEWmodbiblio($dbh,$Zconn,$record,$biblionumber,$frameworkcode); + NEWmodbiblio($dbh,$record,$biblionumber,$frameworkcode); } else { my $biblioitemnumber; ($biblionumber,$biblioitemnumber) = NEWnewbiblio($dbh,$record,$frameworkcode); -- 2.39.5