diff options
| author | Andrew Cohen | 2013-04-26 02:08:43 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2013-04-26 02:08:43 +0000 |
| commit | 9eb45973fcd14ba1cf5ddf8d779335797e26cdc9 (patch) | |
| tree | 3ce2dead6496dffca9a4ea89b3faebdc3c2b8616 | |
| parent | 9d1c5fb6ca5dfc969ea16c10cb496d4839f053bc (diff) | |
| download | emacs-9eb45973fcd14ba1cf5ddf8d779335797e26cdc9.tar.gz emacs-9eb45973fcd14ba1cf5ddf8d779335797e26cdc9.zip | |
lisp/gnus/gnus-msg.el (gnus-inews-insert-gcc): Re-order conditional to work for string values of 'gcc-self
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/gnus-msg.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 4cdc8a103bd..251e5b1f381 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-04-25 Andrew Cohen <cohen@bu.edu> | ||
| 2 | |||
| 3 | * gnus-msg.el (gnus-inews-insert-gcc): Re-order conditional to work for | ||
| 4 | string values of 'gcc-self. Thanks to Saroj Thirumalai. | ||
| 5 | |||
| 1 | 2013-04-24 Andrew Cohen <cohen@bu.edu> | 6 | 2013-04-24 Andrew Cohen <cohen@bu.edu> |
| 2 | 7 | ||
| 3 | * nnir.el (nnir-close-group): Make sure we are in the right group. | 8 | * nnir.el (nnir-close-group): Make sure we are in the right group. |
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el index 362dd3ea7f0..fce9a3633c2 100644 --- a/lisp/gnus/gnus-msg.el +++ b/lisp/gnus/gnus-msg.el | |||
| @@ -1719,8 +1719,8 @@ this is a reply." | |||
| 1719 | (group (when group (gnus-group-decoded-name group))) | 1719 | (group (when group (gnus-group-decoded-name group))) |
| 1720 | (var (or gnus-outgoing-message-group gnus-message-archive-group)) | 1720 | (var (or gnus-outgoing-message-group gnus-message-archive-group)) |
| 1721 | (gcc-self-val | 1721 | (gcc-self-val |
| 1722 | (and group (gnus-group-find-parameter group 'gcc-self) | 1722 | (and group (not (gnus-virtual-group-p group)) |
| 1723 | (not (gnus-virtual-group-p group)))) | 1723 | (gnus-group-find-parameter group 'gcc-self))) |
| 1724 | result | 1724 | result |
| 1725 | (groups | 1725 | (groups |
| 1726 | (cond | 1726 | (cond |