Commit 7642acca authored by Gerd Moellmann's avatar Gerd Moellmann

(desktop-save): Bind coding-system-for-write to

`emacs-mule' for write-region.
parent 10e922bd
......@@ -549,7 +549,8 @@ MODE is the major mode."
info)
(setq default-directory dirname)
(if (file-exists-p filename) (delete-file filename))
(write-region (point-min) (point-max) filename nil 'nomessage)))
(let ((coding-system-for-write 'emacs-mule))
(write-region (point-min) (point-max) filename nil 'nomessage))))
(setq desktop-dirname dirname))
;; ----------------------------------------------------------------------------
(defun desktop-remove ()
......
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