|
Lines 131-137
sub new {
Link Here
|
| 131 |
} |
131 |
} |
| 132 |
|
132 |
|
| 133 |
# Get currency 3 chars max |
133 |
# Get currency 3 chars max |
| 134 |
my $currency = substr Koha::Acquisition::Currencies->get_active->currency, 0, 3; |
134 |
my $currency = Koha::Acquisition::Currencies->get_active; |
|
|
135 |
if ($currency) { |
| 136 |
$currency = substr $currency->currency, 0, 3; |
| 137 |
} |
| 135 |
|
138 |
|
| 136 |
my $circ_blocked = |
139 |
my $circ_blocked = |
| 137 |
( C4::Context->preference('OverduesBlockCirc') ne "noblock" && defined $flags->{ODUES}->{itemlist} ) ? 1 : 0; |
140 |
( C4::Context->preference('OverduesBlockCirc') ne "noblock" && defined $flags->{ODUES}->{itemlist} ) ? 1 : 0; |
| 138 |
- |
|
|