koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/C4 Search.pm,1.25,1.26


From: Steve Tonnesen
Subject: [Koha-cvs] CVS: koha/C4 Search.pm,1.25,1.26
Date: Mon, 13 May 2002 16:07:49 -0700

Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv5450

Modified Files:
        Search.pm 
Log Message:
Calculate itemcount in Search.pm if using new template based search interface


Index: Search.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Search.pm,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -r1.25 -r1.26
*** Search.pm   12 May 2002 18:08:19 -0000      1.25
--- Search.pm   13 May 2002 23:07:47 -0000      1.26
***************
*** 288,291 ****
--- 288,295 ----
          $sth->finish;                                             
        $data2->{'dewey'}=$dewey;
+       if ($env->{itemcount}) {
+           my ($count, $lcount, $nacount, $fcount, $scount, $lostcount, 
$mending, $transit, $ocount) = itemcount($env, $data2->{'biblionumber'}, 
'intra');
+           $data2->{'itemcount'}=$count;
+       }
        $res2[$i]=$data2;
  #     
$res2[$i]="$data2->{'author'}\t$data2->{'title'}\t$data2->{'biblionumber'}\t$data2->{'copyrightdate'}\t$dewey";




reply via email to

[Prev in Thread] Current Thread [Next in Thread]