diff options
Diffstat (limited to 'lisp/gnus/nndoc.el')
| -rw-r--r-- | lisp/gnus/nndoc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/nndoc.el b/lisp/gnus/nndoc.el index 101bb4023f9..3d28f8ea716 100644 --- a/lisp/gnus/nndoc.el +++ b/lisp/gnus/nndoc.el @@ -630,7 +630,7 @@ from the document.") (setq subject (concat " (" (match-string 1) ")")) (when (re-search-forward "^From: \\(.*\\)" nil t) (setq from (concat "<" - (cadr (funcall gnus-extract-address-components + (cadr (funcall gnus-extract-address-components (match-string 1))) ">"))) (if (re-search-forward "^Date: +\\([^(]*\\)" nil t) (setq date (match-string 1)) |