From 28e96084be4cd500137c7b120e766a4870b771a2 Mon Sep 17 00:00:00 2001
From: toins <toins>
Date: Fri, 11 Aug 2006 15:45:37 +0000
Subject: [PATCH] Some usefuls functions were commented.

---
 opac/opac-ISBDdetail.pl |  9 +++------
 opac/opac-MARCdetail.pl | 16 +++++++---------
 2 files changed, 10 insertions(+), 15 deletions(-)

diff --git a/opac/opac-ISBDdetail.pl b/opac/opac-ISBDdetail.pl
index 2811aa1f62..11eff60319 100755
--- a/opac/opac-ISBDdetail.pl
+++ b/opac/opac-ISBDdetail.pl
@@ -23,8 +23,6 @@
 
 MARCdetail.pl : script to show a biblio in MARC format
 
-=head1 SYNOPSIS
-
 
 =head1 DESCRIPTION
 
@@ -67,10 +65,9 @@ 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 $itemtype = &MARCfind_frameworkcode($dbh,$bibid);
-my $itemtype="";
+$bibid = &MARCfind_MARCbibid_from_oldbiblionumber($dbh,$biblionumber) unless $bibid;
+$biblionumber = &MARCfind_oldbiblionumber_from_MARCbibid($dbh,$bibid) unless $biblionumber;
+my $itemtype = &MARCfind_frameworkcode($dbh,$bibid);
 my $tagslib = &MARCgettagslib($dbh,1,$itemtype);
 
 my $record =MARCgetbiblio($dbh,$bibid);
diff --git a/opac/opac-MARCdetail.pl b/opac/opac-MARCdetail.pl
index f8c9237b40..32e4898fa9 100755
--- a/opac/opac-MARCdetail.pl
+++ b/opac/opac-MARCdetail.pl
@@ -63,15 +63,13 @@ my $query=new CGI;
 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 $itemtype = &MARCfind_frameworkcode($dbh,$bibid);
-my $framework = "";
-my $itemtype = "";
-my $tagslib = &MARCgettagslib($dbh,0,$framework);
-
-my $record = get_record($biblionumber);
+my $bibid = $query->param('bibid');
+$bibid = &MARCfind_MARCbibid_from_oldbiblionumber($dbh,$biblionumber) unless $bibid;
+$biblionumber = &MARCfind_oldbiblionumber_from_MARCbibid($dbh,$bibid) unless $biblionumber;
+my $itemtype = &MARCfind_frameworkcode($dbh,$bibid);
+my $tagslib = &MARCgettagslib($dbh,0,$itemtype);
+
+my $record =MARCgetbiblio($dbh,$bibid);
 # open template
 my ($template, $loggedinuser, $cookie)
 		= get_template_and_user({template_name => "opac-MARCdetail.tmpl",
-- 
2.39.5