Lines 315-321
my $pref_itemcallnumber = C4::Context->preference('itemcallnumber');
Link Here
|
315 |
my $subfieldsToAllowForBatchmod = C4::Context->preference('SubfieldsToAllowForRestrictedBatchmod'); |
315 |
my $subfieldsToAllowForBatchmod = C4::Context->preference('SubfieldsToAllowForRestrictedBatchmod'); |
316 |
my $allowAllSubfields = ( |
316 |
my $allowAllSubfields = ( |
317 |
not defined $subfieldsToAllowForBatchmod |
317 |
not defined $subfieldsToAllowForBatchmod |
318 |
or $subfieldsToAllowForBatchmod == q|| |
318 |
or $subfieldsToAllowForBatchmod ne q|| |
319 |
) ? 1 : 0; |
319 |
) ? 1 : 0; |
320 |
my @subfieldsToAllow = split(/ /, $subfieldsToAllowForBatchmod); |
320 |
my @subfieldsToAllow = split(/ /, $subfieldsToAllowForBatchmod); |
321 |
|
321 |
|
322 |
- |
|
|