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