|
Lines 87-93
my $userenv = C4::Context->userenv;
Link Here
|
| 87 |
my $userenv_branch = $userenv->{'branch'} // ''; |
87 |
my $userenv_branch = $userenv->{'branch'} // ''; |
| 88 |
my $forgivemanualholdsexpire = $query->param('forgivemanualholdsexpire'); |
88 |
my $forgivemanualholdsexpire = $query->param('forgivemanualholdsexpire'); |
| 89 |
|
89 |
|
| 90 |
my $overduecharges = (C4::Context->preference('finesMode') && C4::Context->preference('finesMode') ne 'off'); |
90 |
my $overduecharges = (C4::Context->preference('finesMode') && C4::Context->preference('finesMode') eq 'production'); |
| 91 |
|
91 |
|
| 92 |
# Set up the item stack .... |
92 |
# Set up the item stack .... |
| 93 |
my %returneditems; |
93 |
my %returneditems; |
| 94 |
- |
|
|