From: Eli Zaretskii Date: Thu, 29 Oct 2015 17:37:24 +0000 (+0200) Subject: Fix encoding of saving *Help* buffers X-Git-Tag: emacs-25.0.90~976 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8485d41e1948c8966a19343533988f6d26656037;p=emacs.git Fix encoding of saving *Help* buffers * lisp/help-fns.el (describe-function-1): If we use curved quotes, set help buffer's buffer-file-coding-system to UTF-8. (Bug#21780) --- diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 945b4d523cc..f7d05a4bf79 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -623,7 +623,12 @@ FILE is the file where FUNCTION was probably defined." real-function key-bindings-buffer))) (run-hook-with-args 'help-fns-describe-function-functions function) (insert "\n" - (or doc "Not documented.")))))))) + (or doc "Not documented.")) + ;; Avoid asking the user annoyng questions if she decides + ;; to save the help buffer, when her locale's codeset + ;; isn't UTF-8. + (unless (memq text-quoting-style '(straight grave)) + (set-buffer-file-coding-system 'utf-8)))))))) ;; Add defaults to `help-fns-describe-function-functions'. (add-hook 'help-fns-describe-function-functions #'help-fns--obsolete)