# HG changeset patch # User Joakim Verona # Date 1218062215 0 # Node ID 536c0f16eb08518104ca0d7241ffad69bd8c493c # Parent a94eced70f5a201b01198983d0f2f1b04c2b941d Fix for bug #572, removed () from url regexp. diff -r a94eced70f5a -r 536c0f16eb08 lisp/thingatpt.el --- 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