From 5563d1cd829e6c17d22c18e345101feaf736312a Mon Sep 17 00:00:00 2001 From: Eric Abrahamsen Date: Fri, 21 Jun 2019 13:35:27 -0700 Subject: Remove all remaining uses of gnus-group-decoded-name * lisp/gnus/gnus-art.el (gnus-article-setup-buffer): * lisp/gnus/nnrss.el (nnrss-retrieve-groups): * lisp/gnus/message.el (message-forward-subject-author-subject): (message-forward-subject-name-subject): * lisp/gnus/gnus-msg.el (gnus-inews-insert-gcc): (gnus-inews-make-draft): * lisp/gnus/gnus-group.el (gnus-group-compact-group): (gnus-group-list-active): (gnus-group-kill-group): (gnus-group-set-current-level): (gnus-group-expire-articles-1): (gnus-group-catchup-current): (gnus-group-edit-group): (gnus-group-rename-group): (gnus-group-delete-group): (gnus-group-name-at-point): Remove calls in all these places, group names are always decoded. * lisp/gnus/gnus-cache.el: Remove variables gnus-cache-unified-group-names and gnus-cache-decoded-group-names, and function gnus-cache-decoded-group-name. (gnus-cache-generate-active): Do not access gnus-cache-unified-group-names. (gnus-cache-file-name): Don't decode. --- lisp/gnus/gnus-msg.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'lisp/gnus/gnus-msg.el') diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el index b6d649d7603..0ac0164bb7a 100644 --- a/lisp/gnus/gnus-msg.el +++ b/lisp/gnus/gnus-msg.el @@ -413,7 +413,7 @@ Thank you for your help in stamping out bugs. (defun gnus-inews-make-draft (articles) `(lambda () (gnus-inews-make-draft-meta-information - ,(gnus-group-decoded-name gnus-newsgroup-name) ',articles))) + ,gnus-newsgroup-name ',articles))) (autoload 'nnir-article-number "nnir" nil nil 'macro) (autoload 'nnir-article-group "nnir" nil nil 'macro) @@ -1722,7 +1722,6 @@ this is a reply." (defun gnus-inews-insert-gcc (&optional group) "Insert the Gcc to say where the article is to be archived." (let* ((group (or group gnus-newsgroup-name)) - (group (when group (gnus-group-decoded-name group))) (var (or gnus-outgoing-message-group gnus-message-archive-group)) (gcc-self-val (and group (not (gnus-virtual-group-p group)) -- cgit v1.2.1