From fc0a69d1e762adeabe1dbed048d914817dce1ebe Mon Sep 17 00:00:00 2001 From: YAMAMOTO Mitsuharu Date: Sat, 20 May 2006 04:30:07 +0000 Subject: [PATCH] (mac-ae-open-documents): Escape file name on conversion to URL. --- lisp/term/mac-win.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el index 77a1533ef9a..8eb8e6a0460 100644 --- a/lisp/term/mac-win.el +++ b/lisp/term/mac-win.el @@ -1616,7 +1616,10 @@ in `selection-converter-alist', which see." (let ((ae (mac-event-ae event))) (dolist (file-name (mac-ae-list ae nil 'undecoded-file-name)) (if file-name - (dnd-open-local-file (concat "file:" file-name) nil))) + (dnd-open-local-file + (concat "file://" + (mapconcat 'url-hexify-string + (split-string file-name "/") "/")) nil))) (let ((selection-range (mac-ae-selection-range ae)) (search-text (mac-ae-text-for-search ae))) (cond (selection-range -- 2.39.5