[Emacs-diffs] master 0990ae5 4/4: Don't set url-mime-charset-string from set-language-environment

[Lars Ingebrigtsen]

branch: master
commit 0990ae5a8b769a0db7a9c9abd05bd5d89db44d45
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    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 28f8765..134404c 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