Index: openacs-4/packages/dotlrn/www/admin/guest-toggle.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/guest-toggle.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/dotlrn/www/admin/guest-toggle.tcl	29 Jun 2018 17:27:19 -0000	1.8
+++ openacs-4/packages/dotlrn/www/admin/guest-toggle.tcl	3 Sep 2024 15:37:37 -0000	1.9
@@ -14,16 +14,14 @@
 #  details.
 #
 
-# dotlrn/www/admin/site-wide-admin-toggle.tcl
-
 ad_page_contract {
     @author Caroline Meeks (caroline@meekshome.com)
     @creation-date November 19, 2002
     @cvs-id $Id$
 } -query {
     user_id:naturalnum,notnull
-    guest_p:boolean
-    {referer "users"}
+    {guest_p:boolean,notnull 0}
+    {referer:localurl "users"}
 }
 
 #Pages in this directory are only runnable by dotlrn-wide admins.