[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/emacs-24 r111083: Backport gnus-msg fix fro
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/emacs-24 r111083: Backport gnus-msg fix from trunk |
Date: |
Sat, 29 Dec 2012 00:05:17 -0800 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 111083
fixes bug: http://debbugs.gnu.org/13285
author: Lars Ingebrigtsen <address@hidden>
committer: Glenn Morris <address@hidden>
branch nick: emacs-24
timestamp: Sat 2012-12-29 00:05:17 -0800
message:
Backport gnus-msg fix from trunk
* lisp/gnus/gnus-msg.el (gnus-summary-resend-message):
Don't bug out on non-string posting styles.
modified:
lisp/gnus/ChangeLog
lisp/gnus/gnus-msg.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2012-12-27 08:11:33 +0000
+++ b/lisp/gnus/ChangeLog 2012-12-29 08:05:17 +0000
@@ -1,3 +1,8 @@
+2012-12-27 Lars Ingebrigtsen <address@hidden>
+
+ * gnus-msg.el (gnus-summary-resend-message): Don't bug out on
+ non-string posting styles (bug#13285).
+
2012-12-27 Glenn Morris <address@hidden>
* plstore.el (plstore-passphrase-callback-function):
=== modified file 'lisp/gnus/gnus-msg.el'
--- a/lisp/gnus/gnus-msg.el 2012-10-06 20:30:26 +0000
+++ b/lisp/gnus/gnus-msg.el 2012-12-29 08:05:17 +0000
@@ -1384,7 +1384,8 @@
(dolist (style (if styles
(append gnus-posting-styles (list (cons ".*" styles)))
gnus-posting-styles))
- (when (string-match (pop style) gnus-newsgroup-name)
+ (when (and (stringp (car style))
+ (string-match (pop style) gnus-newsgroup-name))
(when (setq tem (cadr (assq 'name style)))
(setq user-full-name tem))
(when (setq tem (cadr (assq 'address style)))