fix for bug #54
This commit is contained in:
parent
3205a1a3ff
commit
86631c1a8e
1 changed files with 9 additions and 1 deletions
|
@ -1802,7 +1802,15 @@ sub borrdata {
|
|||
$sth->execute;
|
||||
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);
|
||||
}
|
||||
}
|
||||
|
||||
=item borrissues
|
||||
|
|
Loading…
Reference in a new issue