[Emacs-diffs] /srv/bzr/emacs/trunk r112386: lisp/gnus/gnus-msg.el (gnus-inews-insert-gcc): Re-order conditional to work for string values of 'gcc-self

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 112386
author: Andrew Cohen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Fri 2013-04-26 02:08:43 +0000
message:
  lisp/gnus/gnus-msg.el (gnus-inews-insert-gcc): Re-order conditional to work 
for string values of 'gcc-self
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/gnus-msg.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2013-04-24 22:07:21 +0000
+++ b/lisp/gnus/ChangeLog       2013-04-26 02:08:43 +0000
@@ -1,3 +1,8 @@
+2013-04-25  Andrew Cohen  <address@hidden>
+
+       * gnus-msg.el (gnus-inews-insert-gcc): Re-order conditional to work for
+       string values of 'gcc-self.  Thanks to Saroj Thirumalai.
+
 2013-04-24  Andrew Cohen  <address@hidden>
 
        * nnir.el (nnir-close-group): Make sure we are in the right group.

=== modified file 'lisp/gnus/gnus-msg.el'
--- a/lisp/gnus/gnus-msg.el     2013-04-12 15:17:47 +0000
+++ b/lisp/gnus/gnus-msg.el     2013-04-26 02:08:43 +0000
@@ -1719,8 +1719,8 @@
          (group (when group (gnus-group-decoded-name group)))
          (var (or gnus-outgoing-message-group gnus-message-archive-group))
         (gcc-self-val
-         (and group (gnus-group-find-parameter group 'gcc-self)
-              (not (gnus-virtual-group-p group))))
+         (and group (not (gnus-virtual-group-p group))
+              (gnus-group-find-parameter group 'gcc-self)))
         result
         (groups
          (cond