Auto detect coding-system of archived source.

buzztaiki · May 9, 2012 · 5abb727 · 5abb727
1 parent 0ec5462
commit 5abb727
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/src/main/lisp/malabar-reflection.el b/src/main/lisp/malabar-reflection.el
@@ -151,8 +151,9 @@
           (setq buffer-file-name (expand-file-name (concat archive ":" file-name)))
           (setq buffer-file-truename (file-name-nondirectory file-name))
           (let ((exit-code
-                 (archive-extract-by-stdout archive file-name
-                                            archive-zip-extract)))
+                 (let ((coding-system-for-read 'undecided))
+                   (archive-extract-by-stdout archive file-name
+                                              archive-zip-extract))))
             (if (and (numberp exit-code) (zerop exit-code))
                 (progn (malabar-mode)
                        (goto-char (point-min))