projects
/
koha.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 10572: Add phone to message_transport_types table for new installs
[koha.git]
/
reports
/
reservereport.pl
diff --git
a/reports/reservereport.pl
b/reports/reservereport.pl
index
4f8a427
..
42a1d20
100755
(executable)
--- a/
reports/reservereport.pl
+++ b/
reports/reservereport.pl
@@
-24,6
+24,7
@@
# eg: http://koha.rangitikei.katipo.co.nz/cgi-bin/koha/reports/reservereport.pl?branch=BL
use strict;
# eg: http://koha.rangitikei.katipo.co.nz/cgi-bin/koha/reports/reservereport.pl?branch=BL
use strict;
+#use warnings; FIXME - Bug 2505
use C4::Stats;
use C4::Dates qw/format_date/;
use CGI;
use C4::Stats;
use C4::Dates qw/format_date/;
use CGI;
@@
-95,7
+96,7
@@
for ( my $i = 0 ; $i < $count ; $i++ ) {
# FIXME still need to shift the text to the template so its translateable
if ( $data->[$i]) {
# find if its on issue
# FIXME still need to shift the text to the template so its translateable
if ( $data->[$i]) {
# find if its on issue
- my @items = GetItemsInfo(
$line{'biblionumber'}, 'intra'
);
+ my @items = GetItemsInfo(
$line{biblionumber}
);
my $onissue = 0;
foreach my $item (@items) {
if ( $item->{'datedue'} eq 'Reserved' ) {
my $onissue = 0;
foreach my $item (@items) {
if ( $item->{'datedue'} eq 'Reserved' ) {