Bug fixes.
This commit is contained in:
parent
3e6b85ad3c
commit
9f32a8adf0
2 changed files with 2 additions and 2 deletions
|
@ -106,7 +106,7 @@ sub FindReserves {
|
|||
my ($bib,$bor)=@_;
|
||||
my $dbh = C4::Context->dbh;
|
||||
# Find the desired items in the reserves
|
||||
my $query="SELECT *,reserves.branchcode,biblio.title AS btitle FROM reserves,borrowers,biblio ";
|
||||
my $query="SELECT *,reserves.branchcode,biblio.title AS btitle, reserves.timestamp as rtimestamp FROM reserves,borrowers,biblio ";
|
||||
# FIXME - These three bits of SQL seem to contain a fair amount of
|
||||
# redundancy. Wouldn't it be better to have a @clauses array, add
|
||||
# one or two clauses as necessary, then join(" AND ", @clauses) ?
|
||||
|
|
|
@ -195,7 +195,7 @@ foreach my $reserveline (@$reserves) {
|
|||
my $restitle;
|
||||
my %row = %$reserveline;
|
||||
if ($reserveline->{'constrainttype'} eq 'o'){
|
||||
$restitle=getreservetitle($reserveline->{'biblionumber'},$reserveline->{'borrowernumber'},$reserveline->{'reservedate'},$reserveline->{'timestamp'});
|
||||
$restitle=getreservetitle($reserveline->{'biblionumber'},$reserveline->{'borrowernumber'},$reserveline->{'reservedate'},$reserveline->{'rtimestamp'});
|
||||
%row = (%row , %$restitle) if $restitle;
|
||||
}
|
||||
push (@reservedata, \%row);
|
||||
|
|
Loading…
Reference in a new issue