Commit 95aac6d1 authored by Eli Zaretskii's avatar Eli Zaretskii
Browse files

(ediff-exec-process): For buffer jobs, bind coding-system-for-read

to ediff-coding-system-for-write.
parent f9fc24a6
2008-10-19 Eli Zaretskii <eliz@gnu.org>
Fix Bug #1183:
* ediff-diff.el (ediff-exec-process): For buffer jobs, bind
coding-system-for-read to ediff-coding-system-for-write.
* ediff-util.el (ediff-make-temp-file): Unconditionally bind
coding-system-for-write to ediff-coding-system-for-write.
* ediff-init.el (ediff-coding-system-for-read): Doc fix.
(ediff-coding-system-for-write): Set to emacs-internal.
2008-10-18 Stefan Monnier <monnier@iro.umontreal.ca>
 
* international/mule-conf.el (emacs-internal): New coding system alias.
......
......@@ -1207,7 +1207,13 @@ delimiter regions"))
;; args.
(defun ediff-exec-process (program buffer synch options &rest files)
(let ((data (match-data))
(coding-system-for-read ediff-coding-system-for-read)
;; If this is a buffer job, we are diffing temporary files
;; produced by Emacs with ediff-coding-system-for-write, so
;; use the same encoding to read the results.
(coding-system-for-read
(if (string-match "buffer" (symbol-name ediff-job-name))
ediff-coding-system-for-write
ediff-coding-system-for-read))
args)
(setq args (append (split-string options) files))
(setq args (delete "" (delq nil args))) ; delete nil and "" from arguments
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment