lisp/gnus/ietf-drums.el (ietf-drums-parse-address): Don't bug out when called with an empty string
This commit is contained in:
parent
a60a2b6db2
commit
5c7e844276
2 changed files with 7 additions and 1 deletions
|
@ -1,3 +1,8 @@
|
|||
2014-02-07 Lars Ingebrigtsen <larsi@gnus.org>
|
||||
|
||||
* ietf-drums.el (ietf-drums-parse-address): Don't bug out when called
|
||||
with an empty string.
|
||||
|
||||
2014-02-06 Lars Ingebrigtsen <larsi@gnus.org>
|
||||
|
||||
* gnus-msg.el (gnus-summary-cancel-article): `user-mail-address' is
|
||||
|
|
|
@ -214,7 +214,8 @@ backslash and doublequote.")
|
|||
(mapconcat 'identity (reverse display-name) " "))
|
||||
(setq display-string (ietf-drums-get-comment string)))
|
||||
(if (not mailbox)
|
||||
(when (string-match "@" display-string)
|
||||
(when (and display-string
|
||||
(string-match "@" display-string))
|
||||
(cons
|
||||
(mapconcat 'identity (nreverse display-name) "")
|
||||
(ietf-drums-get-comment string)))
|
||||
|
|
Loading…
Add table
Reference in a new issue