Index: openacs-4/packages/dotlrn-admin/www/admin/site-wide-admin-toggle.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-admin/www/admin/site-wide-admin-toggle.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/dotlrn-admin/www/admin/site-wide-admin-toggle.tcl	20 Aug 2004 14:44:22 -0000	1.1
+++ openacs-4/packages/dotlrn-admin/www/admin/site-wide-admin-toggle.tcl	28 Jun 2015 12:09:34 -0000	1.2
@@ -35,9 +35,9 @@
                </blockquote>"
 }
 
-if {[string equal $value "grant"] == 1} {
+if {$value eq "grant"} {
     ad_permission_grant $user_id [acs_magic_object "security_context_root"] "admin"
-} elseif {[string equal $value "revoke"] == 1} {
+} elseif {$value eq "revoke"} {
     ad_permission_revoke $user_id [acs_magic_object "security_context_root"] "admin"
 }