[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} = \@subtitles;
+ 	$sth->finish;
  	$sth   = $dbh->prepare("Select * from bibliosubject where biblionumber = ?");
  	$sth->execute($bibnum);