summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2021-12-26 10:20:05 +0200
committerEli Zaretskii <eliz@gnu.org>2021-12-26 10:20:05 +0200
commit97218c311b506614db84233de120a012cc9b0493 (patch)
tree115bee7a25fef48dad25f21df37b723988f8c1d3 /lisp/emacs-lisp
parent9e45929d7c7653a31d28cabdc5ffa144c4d76e2d (diff)
downloademacs-97218c311b506614db84233de120a012cc9b0493.tar.gz
emacs-97218c311b506614db84233de120a012cc9b0493.tar.bz2
emacs-97218c311b506614db84233de120a012cc9b0493.zip
; Fix last change: use 'utf-8-emacs-unix' encoding.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/multisession.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/multisession.el b/lisp/emacs-lisp/multisession.el
index ca15b407819..c58a9abe020 100644
--- a/lisp/emacs-lisp/multisession.el
+++ b/lisp/emacs-lisp/multisession.el
@@ -260,7 +260,7 @@ DOC should be a doc string, and ARGS are keywords as applicable to
(with-temp-buffer
(let* ((time (file-attribute-modification-time
(file-attributes file)))
- (coding-system-for-read 'utf-8-emacs))
+ (coding-system-for-read 'utf-8-emacs-unix))
(insert-file-contents file)
(let ((stored (read (current-buffer))))
(setf (multisession--cached-value object) stored
@@ -329,7 +329,7 @@ DOC should be a doc string, and ARGS are keywords as applicable to
(error (error "Unable to store unreadable value: %s" (buffer-string))))
;; Write to a temp file in the same directory and rename to the
;; file for somewhat better atomicity.
- (let ((coding-system-for-write 'utf-8-emacs)
+ (let ((coding-system-for-write 'utf-8-emacs-unix)
(create-lockfiles nil)
(temp (make-temp-name file))
(write-region-inhibit-fsync nil))
@@ -346,7 +346,7 @@ DOC should be a doc string, and ARGS are keywords as applicable to
(url-unhex-string
(file-name-sans-extension (car (last bits))))
(with-temp-buffer
- (let ((coding-system-for-read 'utf-8-emacs))
+ (let ((coding-system-for-read 'utf-8-emacs-unix))
(insert-file-contents file)
(read (current-buffer)))))))
(directory-files-recursively