summaryrefslogtreecommitdiff
path: root/lisp/dnd.el
diff options
context:
space:
mode:
authorJason Rumney <jasonr@gnu.org>2007-04-11 23:42:03 +0000
committerJason Rumney <jasonr@gnu.org>2007-04-11 23:42:03 +0000
commite39ef8913c093be5ff34e2a5dd027913cb950565 (patch)
tree024d45458665fff835583153966ae77511b35b48 /lisp/dnd.el
parenteb6526ba7e3c0aaa268aec497ff5b415686b93e8 (diff)
downloademacs-e39ef8913c093be5ff34e2a5dd027913cb950565.tar.gz
(dnd-get-local-file-name): Decode both upper and lower
case hex. Do not try to decode non-hex letters.
Diffstat (limited to 'lisp/dnd.el')
-rw-r--r--lisp/dnd.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/dnd.el b/lisp/dnd.el
index 2b523476a4f..df081539cf0 100644
--- a/lisp/dnd.el
+++ b/lisp/dnd.el
@@ -146,7 +146,7 @@ Return nil if URI is not a local file."
(substring uri (match-end 0))))))
(when (and f must-exist)
(setq f (replace-regexp-in-string
- "%[A-Z0-9][A-Z0-9]"
+ "%[A-Fa-f0-9][A-Fa-f0-9]"
(lambda (arg)
(format "%c" (string-to-number (substring arg 1) 16)))
f nil t))