Index: openacs-4/packages/acs-subsite/www/admin/groups/change-join-policy-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/groups/change-join-policy-2.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/acs-subsite/www/admin/groups/change-join-policy-2.tcl 27 Oct 2014 16:39:50 -0000 1.3 +++ openacs-4/packages/acs-subsite/www/admin/groups/change-join-policy-2.tcl 7 Aug 2017 23:47:58 -0000 1.4 @@ -10,7 +10,7 @@ } { group_id:naturalnum,notnull join_policy:notnull - {return_url ""} + {return_url:localurl ""} } -validate { groups_exists_p -requires {group_id:notnull} { if { ![group::permission_p -privilege admin $group_id] } { @@ -36,4 +36,9 @@ set return_url one?group_id=@group_id@ } -ad_returnredirect $return_url \ No newline at end of file +ad_returnredirect $return_url +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: