[Koha-cvs] CVS: koha/C4 Search.pm,1.99.2.1,1.99.2.2

[Paul POULAIN]

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

Modified Files:
      Tag: rel_2_2
        Search.pm 
Log Message:
* multiple biblio subtitles are correctly stored & shown in simple (non-MARC) 
view, even after a biblio modif.

Index: Search.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Search.pm,v
retrieving revision 1.99.2.1
retrieving revision 1.99.2.2
diff -C2 -r1.99.2.1 -r1.99.2.2
*** Search.pm   3 Feb 2005 15:25:14 -0000       1.99.2.1
--- Search.pm   10 Feb 2005 13:15:27 -0000      1.99.2.2
***************
*** 1488,1491 ****
--- 1488,1502 ----
        $data  = $sth->fetchrow_hashref;
        $sth->finish;
+       # handle management of repeated subtitle
+       $sth   = $dbh->prepare("Select * from bibliosubtitle where biblionumber 
= ?");
+       $sth->execute($bibnum);
+       my @subtitles;
+       while (my $dat = $sth->fetchrow_hashref){
+               my %line;
+               $line{subtitle} = $dat->{subtitle};
+               push @subtitles, \%line;
+       } # while
+       $data->{subtitles} = address@hidden;
+       $sth->finish;
        $sth   = $dbh->prepare("Select * from bibliosubject where biblionumber 
= ?");
        $sth->execute($bibnum);