Index: openacs-4/packages/dotlrn/www/element-rename.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/element-rename.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/dotlrn/www/element-rename.tcl	7 Aug 2017 23:48:09 -0000	1.5
+++ openacs-4/packages/dotlrn/www/element-rename.tcl	19 Jan 2018 14:38:45 -0000	1.6
@@ -19,9 +19,10 @@
 template::form create element_rename
 
 if {[template::form is_valid element_rename]} {
-       ns_log notice "-element_id $element_id  -pretty_name $pretty_name"
-       portal::set_pretty_name -element_id $element_id  -pretty_name $pretty_name
-       ad_returnredirect "element-list"
+    ns_log notice "-element_id $element_id  -pretty_name $pretty_name"
+    portal::set_pretty_name -element_id $element_id  -pretty_name $pretty_name
+    ad_returnredirect "element-list"
+    ad_script_abort
 }