diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/startup.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 7bf5400345e..395d1673a1a 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1032,11 +1032,11 @@ opening the first frame (e.g. open a connection to an X server).") ;; buffers (probably *scratch*, *Messages*, *Minibuff-0*). ;; Arguably this should only be done if they're free of ;; multibyte characters. - (mapcar (lambda (buffer) - (with-current-buffer buffer - (if enable-multibyte-characters - (set-buffer-multibyte nil)))) - (buffer-list)) + (mapc (lambda (buffer) + (with-current-buffer buffer + (if enable-multibyte-characters + (set-buffer-multibyte nil)))) + (buffer-list)) ;; Also re-set the language environment in case it was ;; originally done before unibyte was set and is sensitive to ;; unibyte (display table, terminal coding system &c). |