Index: openacs-4/packages/acs-subsite/www/permissions/perm-modify.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/perm-modify.tcl,v diff -u -r1.8.2.4 -r1.8.2.5 --- openacs-4/packages/acs-subsite/www/permissions/perm-modify.tcl 3 Jul 2023 16:05:15 -0000 1.8.2.4 +++ openacs-4/packages/acs-subsite/www/permissions/perm-modify.tcl 30 Jul 2024 13:42:58 -0000 1.8.2.5 @@ -36,13 +36,13 @@ lassign [split $elm ","] party_id priv if { $priv ne "remove" } { set perm_array($elm) add - } + } } foreach elm $perm { lassign [split $elm ","] party_id priv if {$priv eq "remove"} { - foreach priv $privs { + foreach priv $privs { if { [info exists perm_array(${party_id},${priv})] } { if {$mainsite_p && $party_id == "-1"} { util_user_message "#acs-kernel.The_Public# $priv: #acs-subsite.perm_cannot_be_removed#"