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.67.2.9 -r1.67.2.10
--- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl	11 Oct 2016 11:32:22 -0000	1.67.2.9
+++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl	12 Oct 2016 05:58:42 -0000	1.67.2.10
@@ -61,7 +61,7 @@
         #
         # Remove marker from URLs that are already HREF=... or SRC=... chunks
         #
-        if { $includes_html_p && $has_links_p > 0} {
+        if { $includes_html_p && $nr_links > 0} {
             regsub -nocase -all {(href\s*=\s*['\"]?)\x001sTaRtUrL([^\x001]*)eNdUrL\x001} $text {\1\2} text
             regsub -nocase -all {(src\s*=\s*['\"]?)\x001sTaRtUrL([^\x001]*)eNdUrL\x001}  $text {\1\2} text
         }