Index: openacs-4/packages/rules/www/add-rule.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rules/www/Attic/add-rule.tcl,v diff -u -N -r1.7 -r1.8 --- openacs-4/packages/rules/www/add-rule.tcl 17 Dec 2004 16:59:20 -0000 1.7 +++ openacs-4/packages/rules/www/add-rule.tcl 20 Dec 2004 19:38:43 -0000 1.8 @@ -14,13 +14,7 @@ # Just while I get the assessment package ready ad_maybe_redirect_for_registration 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"] -} set assessments [rules::rule::get_assessments]