Lines 126-132
sub new {
Link Here
|
126 |
} |
126 |
} |
127 |
|
127 |
|
128 |
# Get currency 3 chars max |
128 |
# Get currency 3 chars max |
129 |
my $currency = substr Koha::Acquisition::Currencies->get_active->currency, 0, 3; |
129 |
my $active_currency = Koha::Acquisition::Currencies->get_active; |
|
|
130 |
my $currency = $active_currency ? substr( $active_currency->currency, 0, 3 ) : q{}; |
130 |
|
131 |
|
131 |
my $circ_blocked = |
132 |
my $circ_blocked = |
132 |
( C4::Context->preference('OverduesBlockCirc') ne "noblock" && defined $flags->{ODUES}->{itemlist} ) ? 1 : 0; |
133 |
( C4::Context->preference('OverduesBlockCirc') ne "noblock" && defined $flags->{ODUES}->{itemlist} ) ? 1 : 0; |
133 |
- |
|
|