changeset 97342:536c0f16eb08

Fix for bug #572, removed () from url regexp.
author Joakim Verona <joakim@verona.se>
date Wed, 06 Aug 2008 22:36:55 +0000
parents a94eced70f5a
children f0de1f502126
files lisp/thingatpt.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/thingatpt.el	Wed Aug 06 19:14:42 2008 +0000
+++ b/lisp/thingatpt.el	Wed Aug 06 22:36:55 2008 +0000
@@ -208,7 +208,7 @@
 	 (goto-char (point-min)))))
 
 (defvar thing-at-point-url-path-regexp
-  "[^]\t\n \"'()<>[^`{}]*[^]\t\n \"'()<>[^`{}.,;]+"
+  "[^]\t\n \"'<>[^`{}]*[^]\t\n \"'<>[^`{}.,;]+"
   "A regular expression probably matching the host and filename or e-mail part of a URL.")
 
 (defvar thing-at-point-short-url-regexp