Mercurial > emacs
changeset 49270:c84445fe778c
(thing-at-point-file-name-chars): Include non-ASCII
and use documented treatment of -.
author | Dave Love <fx@gnu.org> |
---|---|
date | Wed, 15 Jan 2003 19:44:58 +0000 |
parents | af7779883f3b |
children | 720dd3042058 |
files | lisp/thingatpt.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/thingatpt.el Wed Jan 15 17:53:16 2003 +0000 +++ b/lisp/thingatpt.el Wed Jan 15 19:44:58 2003 +0000 @@ -193,9 +193,9 @@ (put 'list 'end-op (function (lambda () (up-list 1)))) (put 'list 'beginning-op 'backward-sexp) -;; Filenames and URLs +;; Filenames and URLs www.com/foo%32bar -(defvar thing-at-point-file-name-chars "~/A-Za-z0-9---_.${}#%,:" +(defvar thing-at-point-file-name-chars "-~/[:alnum:]_.${}#%,:" "Characters allowable in filenames.") (put 'filename 'end-op