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.3 -r1.4 --- openacs-4/packages/acs-subsite/www/permissions/toggle-inherit.tcl 17 May 2003 10:02:04 -0000 1.3 +++ openacs-4/packages/acs-subsite/www/permissions/toggle-inherit.tcl 28 Aug 2003 09:41:41 -0000 1.4 @@ -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