From 12585bf2c462fe44a580d42587991a12ee930a06 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20Dj=C3=A4rv?= Date: Thu, 28 Jun 2007 19:07:32 +0000 Subject: [PATCH] (dnd-get-local-file-name): Set fixcase to t in call to replace-regexp-in-string. --- lisp/ChangeLog | 5 +++++ lisp/dnd.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2a273b46166..8beffcd2752 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2007-06-28 Jan Dj,Ad(Brv + + * dnd.el (dnd-get-local-file-name): Set fixcase to t in call to + replace-regexp-in-string. + 2007-06-28 Andreas Schwab * Makefile.in ($(lisp)/mh-e/mh-loaddefs.el): Depend on diff --git a/lisp/dnd.el b/lisp/dnd.el index df081539cf0..193fa962ea7 100644 --- a/lisp/dnd.el +++ b/lisp/dnd.el @@ -149,7 +149,7 @@ Return nil if URI is not a local file." "%[A-Fa-f0-9][A-Fa-f0-9]" (lambda (arg) (format "%c" (string-to-number (substring arg 1) 16))) - f nil t)) + f t t)) (let* ((decoded-f (decode-coding-string f (or file-name-coding-system -- 2.39.2