Index: openacs-4/packages/dotlrn-ecommerce/www/admin/gwu-section-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/gwu-section-new.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/dotlrn-ecommerce/www/admin/gwu-section-new.tcl	16 Jul 2005 12:51:06 -0000	1.6
+++ openacs-4/packages/dotlrn-ecommerce/www/admin/gwu-section-new.tcl	19 Jan 2018 12:59:10 -0000	1.7
@@ -344,10 +344,11 @@
     category::map_object -remove_old -object_id $community_id $categories
 } -after_submit {
     ad_returnredirect $return_url
+    ad_script_abort
 }
 
 
 # Used by en_US version of new_class_instance message
 set class_instances_pretty_name [parameter::get -localize -parameter class_instances_pretty_name]
 set page_title "Add Section"
-set context [list $page_title]
\ No newline at end of file
+set context [list $page_title]