# HG changeset patch
# User Andrew Choi <akochoi@shaw.ca>
# Date 999575003 0
# Node ID 6e45d26a25553af85ac1836719f9c548547b6653
# Parent  d6ab4bbbc1335aff01d62230f84f74c7cd58429f
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.

diff -r d6ab4bbbc133 -r 6e45d26a2555 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Sep 04 01:06:53 2001 +0000
+++ b/lisp/ChangeLog	Tue Sep 04 03:43:23 2001 +0000
@@ -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 -r d6ab4bbbc133 -r 6e45d26a2555 lisp/term/mac-win.el
--- 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)))