Index: openacs-4/packages/dotlrn-ecommerce/www/application-approve.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/application-approve.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/dotlrn-ecommerce/www/application-approve.tcl 1 Sep 2005 21:43:57 -0000 1.11 +++ openacs-4/packages/dotlrn-ecommerce/www/application-approve.tcl 3 Sep 2005 08:19:30 -0000 1.12 @@ -45,7 +45,7 @@ where community_id = :community_id }] -dotlrn_ecommerce::section::flush_cache $section_id +dotlrn_ecommerce::section::flush_cache -user_id $user_id $section_id if { $user_id == $actor_id } { @@ -81,7 +81,8 @@ } } on_error { } - + + dotlrn_ecommerce::section::flush_cache -user_id $user_id $section_id ad_returnredirect $return_url } else { if { $type == "prereq" } { @@ -139,6 +140,7 @@ } \ -after_submit { + dotlrn_ecommerce::section::flush_cache -user_id $user_id $section_id ad_returnredirect $return_url } @@ -186,6 +188,7 @@ set override_email "" } dotlrn_community::send_member_email -community_id $community_id -to_user $user_id -type $email_type -override_email $override_email + dotlrn_ecommerce::section::flush_cache -user_id $user_id $section_id ad_returnredirect $return_url } } \ No newline at end of file