|
Lines 156-163
if ($op eq 'add_form') {
Link Here
|
| 156 |
} elsif ($op eq 'cud-delete_confirmed') { |
156 |
} elsif ($op eq 'cud-delete_confirmed') { |
| 157 |
$dbh->do(q|delete from auth_tag_structure where tagfield=? and authtypecode=?|, undef, $searchfield, $authtypecode); |
157 |
$dbh->do(q|delete from auth_tag_structure where tagfield=? and authtypecode=?|, undef, $searchfield, $authtypecode); |
| 158 |
$dbh->do(q|delete from auth_subfield_structure where tagfield=? and authtypecode=?|, undef, $searchfield, $authtypecode); |
158 |
$dbh->do(q|delete from auth_subfield_structure where tagfield=? and authtypecode=?|, undef, $searchfield, $authtypecode); |
| 159 |
my $tagfield = $input->param('tagfield'); |
159 |
print $input->redirect("/cgi-bin/koha/admin/auth_tag_structure.pl?searchfield=$searchfield&authtypecode=$authtypecode"); |
| 160 |
print $input->redirect("/cgi-bin/koha/admin/auth_tag_structure.pl?searchfield=$tagfield&authtypecode=$authtypecode"); |
|
|
| 161 |
exit; |
160 |
exit; |
| 162 |
# END $OP eq DELETE_CONFIRMED |
161 |
# END $OP eq DELETE_CONFIRMED |
| 163 |
################## ITEMTYPE_CREATE ################################## |
162 |
################## ITEMTYPE_CREATE ################################## |
| 164 |
- |
|
|