diff options
| -rw-r--r-- | lisp/desktop.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/desktop.el b/lisp/desktop.el index 54a598d51c0..3286b195fac 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el | |||
| @@ -549,7 +549,8 @@ MODE is the major mode." | |||
| 549 | info) | 549 | info) |
| 550 | (setq default-directory dirname) | 550 | (setq default-directory dirname) |
| 551 | (if (file-exists-p filename) (delete-file filename)) | 551 | (if (file-exists-p filename) (delete-file filename)) |
| 552 | (write-region (point-min) (point-max) filename nil 'nomessage))) | 552 | (let ((coding-system-for-write 'emacs-mule)) |
| 553 | (write-region (point-min) (point-max) filename nil 'nomessage)))) | ||
| 553 | (setq desktop-dirname dirname)) | 554 | (setq desktop-dirname dirname)) |
| 554 | ;; ---------------------------------------------------------------------------- | 555 | ;; ---------------------------------------------------------------------------- |
| 555 | (defun desktop-remove () | 556 | (defun desktop-remove () |