|
Lines 2783-2788
sub PrepareItemrecordDisplay {
Link Here
|
| 2783 |
while ( my ( $itemtype, $description ) = $sth->fetchrow_array ) { |
2783 |
while ( my ( $itemtype, $description ) = $sth->fetchrow_array ) { |
| 2784 |
push @authorised_values, $itemtype; |
2784 |
push @authorised_values, $itemtype; |
| 2785 |
$authorised_lib{$itemtype} = $description; |
2785 |
$authorised_lib{$itemtype} = $description; |
|
|
2786 |
# If we have default value named itemtype or itemtypes, we use it |
| 2787 |
$defaultvalue = $itemtype if ($defaultvalues and ($defaultvalues->{'itemtypes'} eq $itemtype or $defaultvalues->{'itemtype'} eq $itemtype)); |
| 2788 |
|
| 2786 |
} |
2789 |
} |
| 2787 |
#---- class_sources |
2790 |
#---- class_sources |
| 2788 |
} elsif ( $tagslib->{$tag}->{$subfield}->{authorised_value} eq "cn_source" ) { |
2791 |
} elsif ( $tagslib->{$tag}->{$subfield}->{authorised_value} eq "cn_source" ) { |
| 2789 |
- |
|
|