Index: openacs-4/packages/acs-subsite/www/permissions/toggle-inherit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/toggle-inherit.tcl,v diff -u -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/acs-subsite/www/permissions/toggle-inherit.tcl 1 May 2003 19:18:29 -0000 1.2.2.1 +++ openacs-4/packages/acs-subsite/www/permissions/toggle-inherit.tcl 2 Jul 2003 19:57:32 -0000 1.2.2.2 @@ -2,18 +2,19 @@ ad_page_contract { - Toggles the security_inherit_p flag. + Toggles the security_inherit_p flag. - @author rhs@mit.edu - @creation-date 2000-09-30 - @cvs-id $Id$ + @author rhs@mit.edu + @creation-date 2000-09-30 + @cvs-id $Id$ } { - object_id:integer,notnull - {application_url ""} + object_id:integer,notnull + {application_url ""} + {return_url {[export_vars -base "one" {application_url object_id}]}} } ad_require_permission $object_id admin permission::toggle_inherit -object_id $object_id -ad_returnredirect one?[export_vars {application_url object_id}] +ad_returnredirect $return_url