[Koha-cvs] CVS: koha/C4 Search.pm,1.93,1.94

[skemotah]

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

Modified Files:
        Search.pm 
Log Message:
Minor changes to add classification data to return array from loose search.

Index: Search.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Search.pm,v
retrieving revision 1.93
retrieving revision 1.94
diff -C2 -r1.93 -r1.94
*** Search.pm   18 Aug 2004 16:02:26 -0000      1.93
--- Search.pm   4 Sep 2004 13:48:27 -0000       1.94
***************
*** 1236,1240 ****
        my $limit= $num+$offset;
        while (my $data=$sth->fetchrow_hashref){
!               my $query="select dewey,subclass,publishercode from biblioitems 
where biblionumber=?";
                my @bind=($data->{'biblionumber'});
                if ($search->{'class'} ne ''){
--- 1236,1240 ----
        my $limit= $num+$offset;
        while (my $data=$sth->fetchrow_hashref){
!               my $query="select classification,dewey,subclass,publishercode 
from biblioitems where biblionumber=?";
                my @bind=($data->{'biblionumber'});
                if ($search->{'class'} ne ''){
***************
*** 1263,1266 ****
--- 1263,1267 ----
                my $sti=$dbh->prepare($query);
                $sti->execute(@bind);
+               my $classification;
                my $dewey;
                my $subclass;
***************
*** 1270,1273 ****
--- 1271,1275 ----
                if ($bibitemdata = $sti->fetchrow_hashref()){
                        $true=1;
+                       $classification=$bibitemdata->{'classification'};
                        $dewey=$bibitemdata->{'dewey'};
                        $subclass=$bibitemdata->{'subclass'};
***************
*** 1279,1282 ****
--- 1281,1285 ----
                ($dewey == 0) && ($dewey='');
                ($dewey) && ($dewey.=" $subclass");
+               $data->{'classification'}=$classification;
                $data->{'dewey'}=$dewey;
                $data->{'publishercode'}=$publishercode;