*** empty log message ***
[koha.git] / MARCdetail.pl
index a6ed965..f821827 100755 (executable)
@@ -65,11 +65,10 @@ 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);
-warn $record->as_formatted();
 # open template
 my ($template, $loggedinuser, $cookie)
                = get_template_and_user({template_name => "catalogue/MARCdetail.tmpl",
@@ -166,6 +165,7 @@ foreach my $subfield_code (keys(%witness)) {
 $template->param(item_loop => \@item_value_loop,
                                                item_header_loop => \@header_value_loop,
                                                biblionumber => $biblionumber,
-                                               bibid => $bibid);
+                                               bibid => $bibid,
+                                               biblionumber => $biblionumber);
 output_html_with_http_headers $query, $cookie, $template->output;