Mercurial > emacs
comparison lisp/mail/rmailsum.el @ 88245:e2d921647a85
(rmail-summary-get-sender): Doc fix.
author | Henrik Enberg <henrik.enberg@telia.com> |
---|---|
date | Sat, 21 Jan 2006 00:11:44 +0000 |
parents | 5d16d8710768 |
children | e7a1851e3fcc |
comparison
equal
deleted
inserted
replaced
88244:8bfed6ec967b | 88245:e2d921647a85 |
---|---|
1474 (funcall sortfun reverse)) | 1474 (funcall sortfun reverse)) |
1475 (select-window selwin)))) | 1475 (select-window selwin)))) |
1476 | 1476 |
1477 (defun rmail-summary-get-sender (n) | 1477 (defun rmail-summary-get-sender (n) |
1478 "Return the sender for message N. | 1478 "Return the sender for message N. |
1479 If sender is matches `rmail-user-mail-address-regexp' or | 1479 If sender matches `rmail-user-mail-address-regexp' or |
1480 `user-mail-address', return the to-address instead." | 1480 `user-mail-address', return the to-address instead." |
1481 (let ((sender (rmail-desc-get-sender n))) | 1481 (let ((sender (rmail-desc-get-sender n))) |
1482 (if (or (null sender) | 1482 (if (or (null sender) |
1483 (string-match | 1483 (string-match |
1484 (or rmail-user-mail-address-regexp | 1484 (or rmail-user-mail-address-regexp |