[Koha-cvs] CVS: koha/C4 Search.pm,1.60,1.61

[Paul POULAIN]

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1:/tmp/cvs-serv7296/C4

Modified Files:
	Search.pm 
Log Message:
fix for bug #54

Index: Search.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Search.pm,v
retrieving revision 1.60
retrieving revision 1.61
diff -C2 -r1.60 -r1.61
*** Search.pm	7 Mar 2003 16:35:44 -0000	1.60
--- Search.pm	19 Mar 2003 21:37:21 -0000	1.61
***************
*** 1803,1807 ****
    my $data=$sth->fetchrow_hashref;
    $sth->finish;
!   return($data);
  }
  
--- 1803,1815 ----
    my $data=$sth->fetchrow_hashref;
    $sth->finish;
!   if ($data) {
!   	return($data);
! 	} else { # try with firstname
! 		my $sth=$dbh->prepare("select * from borrowers where firstname='$cardnumber'");
! 		$sth->execute;
! 		my $data=$sth->fetchrow_hashref;
! 		$sth->finish;
! 		return($data);
! 	}
  }