Index: openacs-4/packages/ecommerce/www/update-user-classes.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/update-user-classes.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/ecommerce/www/update-user-classes.tcl 10 Dec 2002 20:06:18 -0000 1.6 +++ openacs-4/packages/ecommerce/www/update-user-classes.tcl 11 Dec 2002 23:09:45 -0000 1.7 @@ -11,6 +11,11 @@ usca_p:optional } +if { ![ad_parameter -package_id [ec_id] UserClassAllowSelfPlacement ecommerce] } { + ad_returnredirect index + ad_script_abort +} + set user_id [ad_verify_and_get_user_id] if {$user_id == 0} { set return_url "[ad_conn url]"