From e035283a5fa69513c13868651419d893b65d4522 Mon Sep 17 00:00:00 2001 From: kados Date: Sat, 25 Feb 2006 22:51:32 +0000 Subject: [PATCH] Adding support for new Zconn object from C4::Context.pm --- cataloguing/addbiblio.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/cataloguing/addbiblio.pl b/cataloguing/addbiblio.pl index 4519732a33..16e663a7d8 100755 --- a/cataloguing/addbiblio.pl +++ b/cataloguing/addbiblio.pl @@ -354,6 +354,7 @@ 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'); @@ -432,7 +433,7 @@ if ($op eq "addbiblio") { if ($is_a_modif) { warn "ITS A MODIF : .$biblionumber"; NEWmodbiblioframework($dbh,$biblionumber,$frameworkcode); - NEWmodbiblio($dbh,$record,$biblionumber,$frameworkcode); + NEWmodbiblio($dbh,$Zconn,$record,$biblionumber,$frameworkcode); } else { my $biblioitemnumber; ($biblionumber,$biblioitemnumber) = NEWnewbiblio($dbh,$record,$frameworkcode); @@ -517,4 +518,4 @@ $template->param( itemtype => $frameworkcode, # HINT: if the library has itemtype = framework, itemtype is auto filled ! hide_marc => C4::Context->preference('hide_marc'), ); -output_html_with_http_headers $input, $cookie, $template->output; \ No newline at end of file +output_html_with_http_headers $input, $cookie, $template->output; -- 2.39.2