Index: openacs-4/packages/dotlrn-ecommerce/lib/section.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/section.tcl,v diff -u -r1.41 -r1.42 --- openacs-4/packages/dotlrn-ecommerce/lib/section.tcl 19 Jan 2018 12:59:09 -0000 1.41 +++ openacs-4/packages/dotlrn-ecommerce/lib/section.tcl 20 Jan 2018 22:44:04 -0000 1.42 @@ -157,7 +157,8 @@ # HAM : Let's check if we have InstructorCommunityId enabled and set if { $instructor_community_id == 0 && ![db_0or1row "checkinstructorcommunity" "select community_id from dotlrn_communities where community_id = :instructor_community_id"] } { - ad_return_complaint 1 "Parameter InstructorCommunityId is not set or Community Id does not exist." + ad_return_complaint 1 "Parameter InstructorCommunityId is not set or Community Id does not exist." + ad_script_abort } else { # community_id is valid # list users @@ -177,7 +178,8 @@ # HAM : Let's check if we have AssistantCommunityId enabled and set if { $assistant_community_id == 0 && ![db_0or1row "checkassistantcommunity" "select community_id from dotlrn_communities where community_id = :assistant_community_id"] } { - ad_return_complaint 1 "Parameter AssistantCommunityId is not set or Community Id does not exist." + ad_return_complaint 1 "Parameter AssistantCommunityId is not set or Community Id does not exist." + ad_script_abort } else { # community_id is valid set _assistants [dotlrn_community::list_users $assistant_community_id]