Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Auto detect coding-system of archived source.

  • Loading branch information...
commit 5abb7279f73024fb0ac3abd80c58495f377ba0ce 1 parent 0ec5462
@buzztaiki authored
Showing with 3 additions and 2 deletions.
  1. +3 −2 src/main/lisp/malabar-reflection.el
View
5 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))
Please sign in to comment.
Something went wrong with that request. Please try again.