Index: openacs-4/packages/rules/www/one-rule.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rules/www/Attic/one-rule.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/rules/www/one-rule.tcl 17 Dec 2004 16:29:42 -0000 1.8 +++ openacs-4/packages/rules/www/one-rule.tcl 20 Dec 2004 19:38:43 -0000 1.9 @@ -10,23 +10,9 @@ qs:optional trigger:optional } -set package_id [ad_conn package_id] -set user_id [ad_conn user_id] -set context [list "Add rule"] -set rule_admin "" -set admin [permission::permission_p -object_id $package_id -party_id $user_id -privilege "admin"] -if { [exists_and_not_null rule_id] } { -set rule_admin [permission::permission_p -object_id $rule_id -party_id $user_id -privilege "admin"] -} -if { $rule_admin == 0 && $admin == 0 } { - doc_return 200 text/html "