aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/gnus/gnus-msg.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/gnus/gnus-msg.el')
-rw-r--r--lisp/gnus/gnus-msg.el3
1 files changed, 1 insertions, 2 deletions
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.
413(defun gnus-inews-make-draft (articles) 413(defun gnus-inews-make-draft (articles)
414 `(lambda () 414 `(lambda ()
415 (gnus-inews-make-draft-meta-information 415 (gnus-inews-make-draft-meta-information
416 ,(gnus-group-decoded-name gnus-newsgroup-name) ',articles))) 416 ,gnus-newsgroup-name ',articles)))
417 417
418(autoload 'nnir-article-number "nnir" nil nil 'macro) 418(autoload 'nnir-article-number "nnir" nil nil 'macro)
419(autoload 'nnir-article-group "nnir" nil nil 'macro) 419(autoload 'nnir-article-group "nnir" nil nil 'macro)
@@ -1722,7 +1722,6 @@ this is a reply."
1722(defun gnus-inews-insert-gcc (&optional group) 1722(defun gnus-inews-insert-gcc (&optional group)
1723 "Insert the Gcc to say where the article is to be archived." 1723 "Insert the Gcc to say where the article is to be archived."
1724 (let* ((group (or group gnus-newsgroup-name)) 1724 (let* ((group (or group gnus-newsgroup-name))
1725 (group (when group (gnus-group-decoded-name group)))
1726 (var (or gnus-outgoing-message-group gnus-message-archive-group)) 1725 (var (or gnus-outgoing-message-group gnus-message-archive-group))
1727 (gcc-self-val 1726 (gcc-self-val
1728 (and group (not (gnus-virtual-group-p group)) 1727 (and group (not (gnus-virtual-group-p group))