changeset 30818:f5788dd66ab6

(thing-at-point-url-regexp): Prepend `\<'.
author Dave Love <fx@gnu.org>
date Tue, 15 Aug 2000 14:22:21 +0000
parents fd8b296712e7
children b17078a7d55a
files lisp/thingatpt.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/thingatpt.el	Tue Aug 15 14:20:14 2000 +0000
+++ b/lisp/thingatpt.el	Tue Aug 15 14:22:21 2000 +0000
@@ -215,7 +215,7 @@
 
 (defvar thing-at-point-url-regexp
   (concat
-   "\\(https?://\\|ftp://\\|gopher://\\|telnet://\\|wais://\\|file:/\\|s?news:\\|mailto:\\)"
+   "\\<\\(https?://\\|ftp://\\|gopher://\\|telnet://\\|wais://\\|file:/\\|s?news:\\|mailto:\\)"
    thing-at-point-url-path-regexp)
   "A regular expression probably matching a complete URL.")