Avoid encoding errors in message.el

* lisp/gnus/message.el (message-clone-locals): Don't clone
message-default-charset.  (Bug#25645)
This commit is contained in:
Eli Zaretskii 2017-10-09 16:46:23 +03:00
parent 0c36663db5
commit aca5f0072b

View file

@ -8060,8 +8060,13 @@ regexp VARSTR."
(or (null varstr)
(string-match varstr (symbol-name (car local)))))
(ignore-errors
(set (make-local-variable (car local))
(cdr local)))))
;; Cloning message-default-charset could cause an already
;; encoded text to be encoded again, yielding raw bytes
;; instead of characters in the message.
(unless (string-match "message-default-charset"
(symbol-name (car local)))
(set (make-local-variable (car local))
(cdr local))))))
locals)))
;;;