fix for bug #54

This commit is contained in:
tipaul 2003-03-19 21:37:21 +00:00
parent 3205a1a3ff
commit 86631c1a8e

View file

@ -1802,7 +1802,15 @@ sub borrdata {
$sth->execute;
my $data=$sth->fetchrow_hashref;
$sth->finish;
return($data);
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