Index: openacs-4/packages/dotlrn-ecommerce/www/application-reject.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/application-reject.tcl,v diff -u -r1.22 -r1.23 --- openacs-4/packages/dotlrn-ecommerce/www/application-reject.tcl 17 Oct 2006 23:19:00 -0000 1.22 +++ openacs-4/packages/dotlrn-ecommerce/www/application-reject.tcl 2 Sep 2008 21:48:56 -0000 1.23 @@ -73,7 +73,9 @@ } } - dotlrn_community::membership_reject -community_id $community_id -user_id $user_id +# dotlrn_community::membership_reject -community_id $community_id -user_id $user_id + set rel_id [relation::get_id -object_id_one $community_id -object_id_two $user_id -rel_type "dotlrn_member_rel"] + membership_rel::reject -rel_id $rel_id ad_returnredirect $return_url ad_script_abort