From 8790983cd58e5c18539141cf5cd26bd6da6510ba Mon Sep 17 00:00:00 2001 From: tipaul Date: Wed, 18 Aug 2004 16:44:37 +0000 Subject: [PATCH] commiting stephen hedges modifs to css template & fixing a bug in variable name (same name in TMPL_LOOP and TMPL_VAR confuses a lot HTML::Template) --- C4/SearchMarc.pm | 3 +-- koha-tmpl/opac-tmpl/css/en/opac-detail.tmpl | 28 +++++++++++++++++++++ opac/opac-detail.pl | 2 +- opac/opac-search.pl | 4 +-- 4 files changed, 32 insertions(+), 5 deletions(-) diff --git a/C4/SearchMarc.pm b/C4/SearchMarc.pm index 0961af9f71..66e743b1f9 100644 --- a/C4/SearchMarc.pm +++ b/C4/SearchMarc.pm @@ -464,7 +464,6 @@ sub getMARCsubjects { $mintag = "600"; $maxtag = "619"; } - my $sth=$dbh->prepare("SELECT subfieldvalue,subfieldcode FROM marc_subfield_table WHERE bibid=? AND tag BETWEEN ? AND ? ORDER BY tagorder"); $sth->execute($bibid,$mintag,$maxtag); @@ -478,7 +477,7 @@ sub getMARCsubjects { my $value = $data->[0]; my $subfield = $data->[1]; if ($subfield eq "a" && $value ne $subjct) { - $marcsubjct = {MARCSUBJCTS => $value,}; + $marcsubjct = {MARCSUBJCT => $value,}; push @marcsubjcts, $marcsubjct; $subjct = $value; } diff --git a/koha-tmpl/opac-tmpl/css/en/opac-detail.tmpl b/koha-tmpl/opac-tmpl/css/en/opac-detail.tmpl index 5bc6308fe6..6e027ccf51 100644 --- a/koha-tmpl/opac-tmpl/css/en/opac-detail.tmpl +++ b/koha-tmpl/opac-tmpl/css/en/opac-detail.tmpl @@ -62,6 +62,34 @@ + + + + + + + + + + + + + +
Detailed notes: +
    + + -
    + +
+
Related links: + +
diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl index 5b92764b40..0456a2f5c0 100755 --- a/opac/opac-detail.pl +++ b/opac/opac-detail.pl @@ -49,7 +49,7 @@ $template->param(norequests => $norequests); ## get notes and subjects from MARC record my $marc = C4::Context->preference("marc"); if ($marc eq "yes") { - my $dbh = C4::Context->dbh; + my $dbh = C4::Context->dbh; my $bibid = &MARCfind_MARCbibid_from_oldbiblionumber($dbh,$biblionumber); my $marcflavour = C4::Context->preference("marcflavour"); my $marcnotesarray = &getMARCnotes($dbh,$bibid,$marcflavour); diff --git a/opac/opac-search.pl b/opac/opac-search.pl index 353cca7786..e95c3d6af6 100755 --- a/opac/opac-search.pl +++ b/opac/opac-search.pl @@ -11,7 +11,7 @@ use HTML::Template; use C4::SearchMarc; use C4::Acquisition; use C4::Biblio; -use C4::Search; +# use C4::Search; my $classlist=''; @@ -48,7 +48,7 @@ if ($op eq "do_search") { foreach my $marc (@marclist) { if ($marc) { - my ($tag,$subfield) = MARCfind_marc_from_kohafield($dbh,$marc); + my ($tag,$subfield) = MARCfind_marc_from_kohafield($dbh,$marc,''); if ($tag) { push @tags,$dbh->quote("$tag$subfield"); } else { -- 2.39.5