Index: openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl,v
diff -u -r1.97 -r1.98
--- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl	7 Sep 2018 00:32:52 -0000	1.97
+++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl	7 Sep 2018 00:35:38 -0000	1.98
@@ -221,7 +221,7 @@
     #
     # Prefix every URL starting with a slash by the location.
     #
-    regsub -all {(href|src)\s*=\s*['\"]/([^\u0001:'\"]+?)['\"]} $html \
+    regsub -nocase -all {(href|src)\s*=\s*['\"]/([^\u0001:'\"]+?)['\"]} $html \
         "\\1='${location}\\2'" html
 
     #