View | Details | Raw Unified | Return to bug 7851
Collapse All | Expand All

(-)a/circ/circulation.pl (-8 / +7 lines)
Lines 93-99 my ( $template, $loggedinuser, $cookie ) = get_template_and_user ( Link Here
93
my $branches = GetBranches();
93
my $branches = GetBranches();
94
94
95
my @failedrenews = $query->param('failedrenew');    # expected to be itemnumbers 
95
my @failedrenews = $query->param('failedrenew');    # expected to be itemnumbers 
96
my %renew_failed;
96
our %renew_failed;
97
for (@failedrenews) { $renew_failed{$_} = 1; }
97
for (@failedrenews) { $renew_failed{$_} = 1; }
98
98
99
my $findborrower = $query->param('findborrower');
99
my $findborrower = $query->param('findborrower');
Lines 156-162 if($duedatespec_allow){ Link Here
156
    }
156
    }
157
}
157
}
158
158
159
my $todaysdate = C4::Dates->new->output('iso');
159
our $todaysdate = C4::Dates->new->output('iso');
160
160
161
# check and see if we should print
161
# check and see if we should print
162
if ( $barcode eq '' && $print eq 'maybe' ) {
162
if ( $barcode eq '' && $print eq 'maybe' ) {
Lines 413-425 if ($borrowernumber) { Link Here
413
# make the issued books table.
413
# make the issued books table.
414
my $todaysissues = '';
414
my $todaysissues = '';
415
my $previssues   = '';
415
my $previssues   = '';
416
my @todaysissues;
416
our @todaysissues;
417
my @previousissues;
417
our @previousissues;
418
my @relissues;
418
our @relissues;
419
my @relprevissues;
419
our @relprevissues;
420
my $displayrelissues;
420
my $displayrelissues;
421
421
422
my $totalprice = 0;
422
our $totalprice = 0;
423
423
424
sub build_issue_data {
424
sub build_issue_data {
425
    my $issueslist = shift;
425
    my $issueslist = shift;
426
- 

Return to bug 7851