diff lisp/term/mac-win.el @ 39101:6e45d26a2555

2001-09-04 Andrew Choi <akochoi@cse.cuhk.edu.hk> * term/mac-win.el (mac-drag-n-drop): Decode file name by consulting the value of file-name-coding-system.
author Andrew Choi <akochoi@shaw.ca>
date Tue, 04 Sep 2001 03:43:23 +0000
parents 9cf07e15b208
children 01b93e5e53a7 2bff8007f2d2
line wrap: on
line diff
--- a/lisp/term/mac-win.el	Tue Sep 04 01:06:53 2001 +0000
+++ b/lisp/term/mac-win.el	Tue Sep 04 03:43:23 2001 +0000
@@ -150,7 +150,14 @@
 	   (y (cdr coords)))
       (if (and (> x 0) (> y 0))
 	  (set-frame-selected-window nil window))
-      (mapcar 'find-file (car (cdr (cdr event)))))
+      (mapcar
+       '(lambda (file)
+	  (find-file
+	   (decode-coding-string
+	    file
+	    (or file-name-coding-system
+		default-file-name-coding-system))))
+       (car (cdr (cdr event)))))
   (raise-frame)
   (recenter)))