[Koha-cvs] CVS: koha/C4 SearchMarc.pm,1.22,1.23

[Paul POULAIN]

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20012/C4

Modified Files:
        SearchMarc.pm 
Log Message:
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)

Index: SearchMarc.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/SearchMarc.pm,v
retrieving revision 1.22
retrieving revision 1.23
diff -C2 -r1.22 -r1.23
*** SearchMarc.pm       17 Aug 2004 20:53:34 -0000      1.22
--- SearchMarc.pm       18 Aug 2004 16:44:37 -0000      1.23
***************
*** 465,469 ****
                $maxtag = "619";
        }
- 
        my $sth=$dbh->prepare("SELECT subfieldvalue,subfieldcode FROM 
marc_subfield_table WHERE bibid=? AND tag BETWEEN ? AND ? ORDER BY tagorder");
  
--- 465,468 ----
***************
*** 479,483 ****
                my $subfield = $data->[1];
                if ($subfield eq "a" && $value ne $subjct) {
!                       $marcsubjct = {MARCSUBJCTS => $value,};
                        push @marcsubjcts, $marcsubjct;
                        $subjct = $value;
--- 478,482 ----
                my $subfield = $data->[1];
                if ($subfield eq "a" && $value ne $subjct) {
!                       $marcsubjct = {MARCSUBJCT => $value,};
                        push @marcsubjcts, $marcsubjct;
                        $subjct = $value;