|
Lines 188-194
my $authtypecode = $authobj ? $authobj->authtypecode : q{};
Link Here
|
| 188 |
$tagslib = &GetTagsLabels(1,$authtypecode); |
188 |
$tagslib = &GetTagsLabels(1,$authtypecode); |
| 189 |
|
189 |
|
| 190 |
# Build list of authtypes for showing them |
190 |
# Build list of authtypes for showing them |
| 191 |
my $authority_types = Koha::Authority::Types->search({}, { order_by => ['authtypecode']}); |
191 |
my $authority_types = Koha::Authority::Types->search({}, { order_by => ['authtypetext']}); |
| 192 |
|
192 |
|
| 193 |
my $record=GetAuthority($authid); |
193 |
my $record=GetAuthority($authid); |
| 194 |
|
194 |
|
| 195 |
- |
|
|