[Koha-cvs] CVS: koha search.pl,1.6.2.4,1.6.2.5

[Steve Tonnesen]

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

Modified Files:
      Tag: rel-1-2
	search.pl 
Log Message:
Logic error.  Was using homebranch count as the count of circulating copies.


Index: search.pl
===================================================================
RCS file: /cvsroot/koha/koha/search.pl,v
retrieving revision 1.6.2.4
retrieving revision 1.6.2.5
diff -C2 -r1.6.2.4 -r1.6.2.5
*** search.pl	28 Jun 2002 04:54:48 -0000	1.6.2.4
--- search.pl	28 Jun 2002 15:56:57 -0000	1.6.2.5
***************
*** 6,11 ****
  use CGI;
  use C4::Output;
! use C4::Acquisitions;  # Only used for branches() routine which should probably
!                        # be elsewhere
  
  my $env;
--- 6,10 ----
  use CGI;
  use C4::Output;
! use C4::Acquisitions;
  
  my $env;
***************
*** 217,229 ****
  	      }
        } else {
! 	      my $circcount;
! 	      foreach my $branchcode (sort keys %$branchcount) {
! 		  $circcount=$branchcount->{$branchcode};
! 	      }
! 	      my $shelfcount=$count-$circcount-$lostcount-$mending-$transit;
! 	      if ($circcount) {
  		      $stuff[5]="Circ ";
  		      if ($count>1) {
! 			      $stuff[5].="($circcount) ";
  		      }
  	      }
--- 216,224 ----
  	      }
        } else {
! 	      my $shelfcount=$count-$nacount-$lostcount-$mending-$transit;
! 	      if ($nacount) {
  		      $stuff[5]="Circ ";
  		      if ($count>1) {
! 			      $stuff[5].="($nacount) ";
  		      }
  	      }