From 0990ae5a8b769a0db7a9c9abd05bd5d89db44d45 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 9 Jul 2019 03:44:06 +0200 Subject: [PATCH] Don't set url-mime-charset-string from set-language-environment * lisp/url/url-vars.el (url-set-mime-charset-string): Make obsolete and don't add to set-language-environment-hook (bug#36268). If you loaded url-vars before calling set-language-environment, you would suddenly get an unusable long url-mime-charset-string. --- lisp/url/url-vars.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/url/url-vars.el b/lisp/url/url-vars.el index 28f876554bb..134404c9984 100644 --- a/lisp/url/url-vars.el +++ b/lisp/url/url-vars.el @@ -272,9 +272,8 @@ The MIME charset corresponding to the most preferred coding system is given priority 1 and the rest are given priority 0.5.") (defun url-set-mime-charset-string () + (declare (obsolete nil "27.1")) (setq url-mime-charset-string (url-mime-charset-string))) -;; Regenerate if the language environment changes. -(add-hook 'set-language-environment-hook 'url-set-mime-charset-string) ;; Fixme: set from the locale. (defcustom url-mime-language-string nil -- 2.39.5