Index: openacs-4/packages/forums/lib/message/thread-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/thread-chunk.tcl,v
diff -u -r1.12.2.2 -r1.12.2.3
--- openacs-4/packages/forums/lib/message/thread-chunk.tcl	13 Oct 2015 10:44:53 -0000	1.12.2.2
+++ openacs-4/packages/forums/lib/message/thread-chunk.tcl	7 Sep 2016 09:25:27 -0000	1.12.2.3
@@ -135,9 +135,7 @@
   ad_return_template $alt_template
 }
 
-set response_arrays_stub "<script type=\"text/javascript\">
-<!--
-"
+set response_arrays_stub ""
 foreach one_parent_id [array names parent_message] {
     set one_children_list $parent_message($one_parent_id)
     if {[llength $one_children_list] == 1} {
@@ -146,9 +144,9 @@
     }
     append response_arrays_stub "  forums_replies\[$one_parent_id\] = new Array([join $one_children_list ","]);\n"
 }
-append response_arrays_stub "-->
-</script>
-"
+if {$response_arrays_stub ne ""} {
+    template::add_body_script -script $response_arrays_stub
+}
 
 set return_url [ad_return_url]