Lines 2488-2494
sub PrepareItemrecordDisplay {
Link Here
|
2488 |
push @authorised_values, "" unless ( $tagslib->{$tag}->{$subfield}->{mandatory} ); |
2488 |
push @authorised_values, "" unless ( $tagslib->{$tag}->{$subfield}->{mandatory} ); |
2489 |
|
2489 |
|
2490 |
my $class_sources = GetClassSources(); |
2490 |
my $class_sources = GetClassSources(); |
2491 |
my $default_source = C4::Context->preference("DefaultClassificationSource"); |
2491 |
my $default_source = $defaultvalue || C4::Context->preference("DefaultClassificationSource"); |
2492 |
|
2492 |
|
2493 |
foreach my $class_source (sort keys %$class_sources) { |
2493 |
foreach my $class_source (sort keys %$class_sources) { |
2494 |
next unless $class_sources->{$class_source}->{'used'} or |
2494 |
next unless $class_sources->{$class_source}->{'used'} or |
2495 |
- |
|
|