Index: openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl,v diff -u -r1.57 -r1.57.2.1 --- openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl 26 Jun 2015 08:17:07 -0000 1.57 +++ openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl 18 Aug 2015 09:56:04 -0000 1.57.2.1 @@ -980,7 +980,7 @@ foreach file $::_xo_js_order { if {[string match "*;*" $file]} { # it is not a file, but some javascipt statements - append statements $file \n + append statements [string map {< "<" > ">"} $file] \n } else { template::head::add_script -src $file -type text/javascript -order [incr order] }