[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);
!       }
  }