Index: openacs-4/packages/acs-subsite/www/admin/groups/change-join-policy.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/groups/change-join-policy.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-subsite/www/admin/groups/change-join-policy.tcl	27 Oct 2014 16:39:50 -0000	1.4
+++ openacs-4/packages/acs-subsite/www/admin/groups/change-join-policy.tcl	7 Aug 2017 23:47:58 -0000	1.5
@@ -9,7 +9,7 @@
     @cvs-id $Id$
 } {
     group_id:naturalnum,notnull
-    {return_url ""}
+    {return_url:localurl ""}
 } -properties {
     context:onevalue
     group_id:onevalue
@@ -44,5 +44,10 @@
 }
 
 set possible_join_policies [list open "needs approval" closed]
-set QQreturn_url [ad_quotehtml $return_url]
-ad_return_template
\ No newline at end of file
+set QQreturn_url [ns_quotehtml $return_url]
+ad_return_template
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: