(gnus-inews-insert-gcc): Fix the mistake of using list, not listp.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b2798cc..3338bc0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-09-02  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-msg.el (gnus-inews-insert-gcc): Fix the mistake of using
+       list, not listp.
+
 2005-09-02  Hrvoje Niksic  <hniksic@xemacs.org>
 
        * mm-encode.el (mm-encode-content-transfer-encoding): Likewise

diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index efa732b..9e15159 100644 (file)
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -1663,7 +1663,7 @@ this is a reply."
             (gcc (cond
                   ((functionp group)
                    (funcall group))
-                  ((or (stringp group) (list group))
+                  ((or (stringp group) (listp group))
                    group))))
        (when gcc
          (insert "Gcc: "