[Koha-cvs] koha/opac opac-MARCdetail.pl

[Chris Cormack]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         
Changes by:     Chris Cormack <address@hidden>  06/02/21 00:12:26

Modified files:
        opac           : opac-MARCdetail.pl 

Log message:
        Using get_record() from Search.pm
        
        Not ready for production, its just set to always use the default 
framework at the moment

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/opac/opac-MARCdetail.pl.diff?tr1=1.10&tr2=1.11&r1=text&r2=text

Patches:
Index: koha/opac/opac-MARCdetail.pl
diff -u koha/opac/opac-MARCdetail.pl:1.10 koha/opac/opac-MARCdetail.pl:1.11
--- koha/opac/opac-MARCdetail.pl:1.10   Fri Jan  6 16:39:42 2006
+++ koha/opac/opac-MARCdetail.pl        Tue Feb 21 00:12:26 2006
@@ -63,13 +63,15 @@
 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 $tagslib = &MARCgettagslib($dbh,0,$itemtype);
+# 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 =MARCgetbiblio($dbh,$bibid);
+my $record = get_record($biblionumber);
 # open template
 my ($template, $loggedinuser, $cookie)
                = get_template_and_user({template_name => 
"opac-MARCdetail.tmpl",
@@ -147,11 +149,11 @@
                }
                if ($#subfields_data>=0) {
                        my %tag_data;
-                       if ($fields[$x_i]->tag() eq $fields[$x_i-1]->tag()) {
-                               $tag_data{tag}="";
-                       } else {
+       #               if ($fields[$x_i]->tag() eq $fields[$x_i-1]->tag()) {
+       #                       $tag_data{tag}="";
+       #               } else {
                                $tag_data{tag}=$fields[$x_i]->tag().' -'. 
$tagslib->{$fields[$x_i]->tag()}->{lib};
-                       }
+       #               }
                        my @tmp = @subfields_data;
                        $tag_data{subfield} = address@hidden;
                        push (@loop_data, \%tag_data);
@@ -210,8 +212,7 @@
 
 $template->param(item_loop => address@hidden,
                                                item_header_loop => 
address@hidden,
-                                               biblionumber => $biblionumber,
-                                               bibid => $bibid,
+#                                              bibid => $bibid,
                                                biblionumber => $biblionumber);
 output_html_with_http_headers $query, $cookie, $template->output;
 
@@ -220,12 +221,12 @@
 
    #---- branch
     if ($tagslib->{$tag}->{$subfield}->{'authorised_value'} eq "branches" ) {
-       return getbranchdetail($value)->{branchname};
+#       return getbranchdetail($value)->{branchname};
     }
 
    #---- itemtypes
    if ($tagslib->{$tag}->{$subfield}->{'authorised_value'} eq "itemtypes" ) {
-       return ItemType($value);
+#       return ItemType($value);
     }
 
    #---- "true" authorized value