Lines 35-42
my $marcflavour = C4::Context->preference("marcflavour");
Link Here
|
35 |
my $error = $input->param('error'); |
35 |
my $error = $input->param('error'); |
36 |
my $authid = $input->param('authid') || 0; |
36 |
my $authid = $input->param('authid') || 0; |
37 |
|
37 |
|
38 |
my $record = GetAuthority($authid); |
38 |
my $authority = Koha::Authorities->find($authid); |
39 |
my $authobj = Koha::Authorities->find($authid); |
39 |
my $record = $authority->record; |
40 |
my $authtypecode = $authobj ? $authobj->authtypecode : ''; |
40 |
my $authtypecode = $authobj ? $authobj->authtypecode : ''; |
41 |
my $authority_type = Koha::Authority::Types->find($authtypecode); |
41 |
my $authority_type = Koha::Authority::Types->find($authtypecode); |
42 |
my $authtag = $authority_type->auth_tag_to_report; |
42 |
my $authtag = $authority_type->auth_tag_to_report; |
43 |
- |
|
|