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 247-252
my $servers = Koha::Z3950Servers->search(
Link Here
|
247 |
$template->param( |
250 |
$template->param( |
248 |
servers => $servers, |
251 |
servers => $servers, |
249 |
authority_types => $authority_types, |
252 |
authority_types => $authority_types, |
|
|
253 |
pending_deletion_authid => $pending_deletion_authid, |
250 |
op => $op, |
254 |
op => $op, |
251 |
); |
255 |
); |
252 |
|
256 |
|