Lines 27-33
use warnings;
Link Here
|
27 |
use CGI; |
27 |
use CGI; |
28 |
use C4::Output; |
28 |
use C4::Output; |
29 |
use C4::Print; |
29 |
use C4::Print; |
30 |
use C4::Auth qw/:DEFAULT get_session/; |
30 |
use C4::Auth qw/:DEFAULT get_session haspermission/; |
31 |
use C4::Dates qw/format_date/; |
31 |
use C4::Dates qw/format_date/; |
32 |
use C4::Branch; # GetBranches |
32 |
use C4::Branch; # GetBranches |
33 |
use C4::Koha; # GetPrinter |
33 |
use C4::Koha; # GetPrinter |
Lines 98-103
my ( $template, $loggedinuser, $cookie ) = get_template_and_user (
Link Here
|
98 |
my $branches = GetBranches(); |
98 |
my $branches = GetBranches(); |
99 |
|
99 |
|
100 |
my $force_allow_issue = $query->param('forceallow') || 0; |
100 |
my $force_allow_issue = $query->param('forceallow') || 0; |
|
|
101 |
if (!C4::Auth::haspermission( C4::Context->userenv->{id} , { circulate => 'force_checkout' } )) { |
102 |
$force_allow_issue = 0; |
103 |
} |
101 |
|
104 |
|
102 |
my @failedrenews = $query->param('failedrenew'); # expected to be itemnumbers |
105 |
my @failedrenews = $query->param('failedrenew'); # expected to be itemnumbers |
103 |
our %renew_failed = (); |
106 |
our %renew_failed = (); |
104 |
- |
|
|