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.12 -r1.67.2.13
--- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 13 Oct 2016 08:05:17 -0000 1.67.2.12
+++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 27 Oct 2016 08:56:35 -0000 1.67.2.13
@@ -69,10 +69,12 @@
# JCD: don't treat things =xxx@xxx.xxx as email since most
# common occurance seems to be in urls (although VPATH bounce
# emails like bounce-user=domain.com@sourcehost.com will then
- # not work correctly). It's all quite ugly.
+ # not work correctly). Another tricky case is
+ # http://www.postgresql.org/message-id/20060329203545.M43728@narrowpathinc.com
+ # where we do not want turn the @ into a mailto.
incr nr_links [regsub -nocase -all \
- {([^a-zA-Z0-9=]+)(mailto:)?([^=\(\)\s:;,@<>]+@[^\(\)\s.:;,@<>]+[.][^\(\)\s:;,@<>]+)} $text \
+ {([^a-zA-Z0-9=/.]+)(mailto:)?([^=\(\)\s:;,@<>/]+@[^\(\)\s.:;,@<>]+[.][^\(\)\s:;,@<>]+)} $text \
"\\1\u0002mailto:\\3\u0003" text]
#