[Koha-cvs] CVS: koha/admin auth_tag_structure.pl,1.2,1.2.2.1
Paul POULAIN
tipaul at users.sourceforge.net
Thu Jan 20 16:06:35 CET 2005
Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32360/admin
Modified Files:
Tag: rel_2_2
auth_tag_structure.pl
Log Message:
deleting tags for the requested framework only.
Index: auth_tag_structure.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/auth_tag_structure.pl,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -C2 -r1.2 -r1.2.2.1
*** auth_tag_structure.pl 10 Jun 2004 08:58:34 -0000 1.2
--- auth_tag_structure.pl 20 Jan 2005 15:06:31 -0000 1.2.2.1
***************
*** 174,177 ****
--- 174,178 ----
$template->param(liblibrarian => $data->{'liblibrarian'},
searchfield => $searchfield,
+ authtypecode => $authtypecode,
);
# END $OP eq DELETE_CONFIRM
***************
*** 180,185 ****
} elsif ($op eq 'delete_confirmed') {
unless (C4::Context->config('demo') eq 1) {
! $dbh->do("delete from auth_tag_structure where tagfield='$searchfield'");
! $dbh->do("delete from auth_subfield_structure where tagfield='$searchfield'");
}
# END $OP eq DELETE_CONFIRMED
--- 181,186 ----
} elsif ($op eq 'delete_confirmed') {
unless (C4::Context->config('demo') eq 1) {
! $dbh->do("delete from auth_tag_structure where tagfield='$searchfield' and authtypecode='$authtypecode'");
! $dbh->do("delete from auth_subfield_structure where tagfield='$searchfield' and authtypecode='$authtypecode'");
}
# END $OP eq DELETE_CONFIRMED
More information about the Koha-cvs
mailing list