[Koha-cvs] koha detail.pl [rel_2_2]
Joshua Ferraro
jmf at kados.org
Thu Apr 13 19:25:00 CEST 2006
CVSROOT: /sources/koha
Module name: koha
Branch: rel_2_2
Changes by: Joshua Ferraro <kados at savannah.gnu.org> 06/04/13 17:25:00
Modified files:
. : detail.pl
Log message:
sorry, sloppiness on my part, using @results array now as originally
intended.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/detail.pl.diff?only_with_tag=rel_2_2&tr1=1.24.2.7&tr2=1.24.2.8&r1=text&r2=text
Patches:
Index: koha/detail.pl
diff -u koha/detail.pl:1.24.2.7 koha/detail.pl:1.24.2.8
--- koha/detail.pl:1.24.2.7 Thu Apr 13 17:14:13 2006
+++ koha/detail.pl Thu Apr 13 17:25:00 2006
@@ -49,7 +49,7 @@
}
$template->param(norequests => $norequests);
-
+my @results = ($dat,);
## get notes and subjects from MARC record
my $dbh = C4::Context->dbh;
my $bibid = &MARCfind_MARCbibid_from_oldbiblionumber($dbh,$biblionumber);
@@ -57,15 +57,14 @@
if (C4::Context->preference("marc") eq "yes") {
my $marcflavour = C4::Context->preference("marcflavour");
my $marcnotesarray = &getMARCnotes($dbh,$bibid,$marcflavour);
- $dat[0]->{MARCNOTES} = $marcnotesarray;
+ $results[0]->{MARCNOTES} = $marcnotesarray;
my $marcsubjctsarray = &getMARCsubjects($dbh,$bibid,$marcflavour);
- $dat[0]->{MARCSUBJCTS} = $marcsubjctsarray;
+ $results[0]->{MARCSUBJCTS} = $marcsubjctsarray;
#$template->param(MARCNOTES => $marcnotesarray,
# MARCSUBJCTS => $marcsubjctsarray,
#);
}
-my @results = ($dat,);
my $resultsarray=\@results;
my $itemsarray=\@items;
More information about the Koha-cvs
mailing list