|
Lines 46-51
my $authid = $query->param('authid') || '';
Link Here
|
| 46 |
my ( $template, $loggedinuser, $cookie ); |
46 |
my ( $template, $loggedinuser, $cookie ); |
| 47 |
|
47 |
|
| 48 |
my $authority_types = Koha::Authority::Types->search( {}, { order_by => ['authtypetext'] } ); |
48 |
my $authority_types = Koha::Authority::Types->search( {}, { order_by => ['authtypetext'] } ); |
|
|
49 |
my $pending_deletion_authid; |
| 49 |
|
50 |
|
| 50 |
if ( $op eq "delete" ) { |
51 |
if ( $op eq "delete" ) { |
| 51 |
( $template, $loggedinuser, $cookie ) = get_template_and_user( |
52 |
( $template, $loggedinuser, $cookie ) = get_template_and_user( |
|
Lines 64-69
if ( $op eq "delete" ) {
Link Here
|
| 64 |
}); |
65 |
}); |
| 65 |
|
66 |
|
| 66 |
DelAuthority({ authid => $authid }); |
67 |
DelAuthority({ authid => $authid }); |
|
|
68 |
# FIXME No error handling here, DelAuthority needs adjustments |
| 69 |
$pending_deletion_authid = $authid; |
| 67 |
|
70 |
|
| 68 |
if ( $query->param('operator') ) { |
71 |
if ( $query->param('operator') ) { |
| 69 |
# query contains search params so perform search |
72 |
# query contains search params so perform search |
|
Lines 238-243
my $servers = Koha::Z3950Servers->search(
Link Here
|
| 238 |
$template->param( |
241 |
$template->param( |
| 239 |
servers => $servers, |
242 |
servers => $servers, |
| 240 |
authority_types => $authority_types, |
243 |
authority_types => $authority_types, |
|
|
244 |
pending_deletion_authid => $pending_deletion_authid, |
| 241 |
op => $op, |
245 |
op => $op, |
| 242 |
); |
246 |
); |
| 243 |
|
247 |
|