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.

2 files changed, 13 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ee039edfb7b..07a12fc9283 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+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.
+
 2001-09-03  Stefan Monnier  <monnier@cs.yale.edu>
 
         * help.el (describe-function-1): Save precomputed `file-name' rather
diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index 2032ebe258c..48c210d51e2 100644
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -150,7 +150,14 @@ Switch to a buffer editing the last file dropped."
            (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)))