From 5347b92619d3730822fa58592088cdd95e73354d Mon Sep 17 00:00:00 2001 From: tipaul Date: Tue, 18 Mar 2003 11:14:50 +0000 Subject: [PATCH] bugfix --- MARCdetail.pl | 2 +- memberentry.pl | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/MARCdetail.pl b/MARCdetail.pl index 80745c9164..b6f5a94b32 100755 --- a/MARCdetail.pl +++ b/MARCdetail.pl @@ -65,7 +65,7 @@ my $dbh=C4::Context->dbh; my $biblionumber=$query->param('bib'); my $bibid = $query->param('bibid'); $bibid = &MARCfind_MARCbibid_from_oldbiblionumber($dbh,$biblionumber) unless $bibid; - +$biblionumber = &MARCfind_oldbiblionumber_from_MARCbibid($dbh,$bibid) unless $biblionumber; my $tagslib = &MARCgettagslib($dbh,1); my $record =MARCgetbiblio($dbh,$bibid); diff --git a/memberentry.pl b/memberentry.pl index 5624b9aee1..054a1522bc 100755 --- a/memberentry.pl +++ b/memberentry.pl @@ -35,6 +35,7 @@ use C4::Search; use C4::Members; use C4::Koha; use HTML::Template; +use Date::Manip; my $input = new CGI; -- 2.39.5