[Koha-cvs] CVS: koha search.pl,1.18,1.19

[Andrew Arensburger]

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

Modified Files:
	search.pl 
Log Message:
Replaced expressions of the form "$x = $x <op> $y" with "$x <op>= $y".
Thus, $x = $x+2 becomes $x += 2, and so forth.


Index: search.pl
===================================================================
RCS file: /cvsroot/koha/koha/search.pl,v
retrieving revision 1.18
retrieving revision 1.19
diff -C2 -r1.18 -r1.19
*** search.pl	13 Oct 2002 05:49:51 -0000	1.18
--- search.pl	13 Oct 2002 11:32:37 -0000	1.19
***************
*** 134,162 ****
  my $searchdesc='';
  if ($keyword){
!     $search=$search."&keyword=$keyword";		# FIXME - .=
      $searchdesc.="keyword $keyword, ";
  }
  if (my $subjectitems=$query->param('subjectitems')){
!     $search=$search."&subjectitems=$subjectitems";	# FIXME - .=
      $searchdesc.="subject $subjectitems, ";
  }
  if ($subject){
!     $search=$search."&subject=$subject";		# FIXME - .=
      $searchdesc.="subject $subject, ";
  }
  if ($author){
!     $search=$search."&author=$author";			# FIXME - .=
      $searchdesc.="author $author, ";
  }
  if ($class){
!     $search=$search."&class=$class";			# FIXME - .=
      $searchdesc.="class $class, ";
  }
  if ($title){
!     $search=$search."&title=$title";			# FIXME - .=
      $searchdesc.="title $title, ";
  }
  if ($dewey){
!     $search=$search."&dewey=$dewey";			# FIXME - .=
      $searchdesc.="dewey $dewey, ";
  }
--- 134,162 ----
  my $searchdesc='';
  if ($keyword){
!     $search .= "&keyword=$keyword";
      $searchdesc.="keyword $keyword, ";
  }
  if (my $subjectitems=$query->param('subjectitems')){
!     $search .= "&subjectitems=$subjectitems";
      $searchdesc.="subject $subjectitems, ";
  }
  if ($subject){
!     $search .= "&subject=$subject";
      $searchdesc.="subject $subject, ";
  }
  if ($author){
!     $search .= "&author=$author";
      $searchdesc.="author $author, ";
  }
  if ($class){
!     $search .= "&class=$class";
      $searchdesc.="class $class, ";
  }
  if ($title){
!     $search .= "&title=$title";
      $searchdesc.="title $title, ";
  }
  if ($dewey){
!     $search .= "&dewey=$dewey";
      $searchdesc.="dewey $dewey, ";
  }