Commit 7e8d1b08 authored by Nick Gasson's avatar Nick Gasson Committed by Eli Zaretskii
Browse files

Avoid errors in rmailsum for messages without "From"

* lisp/mail/rmailsum.el (rmail-header-summary): Be defensive about
the presence of the "From" header.  (Bug#49770)

Copyright-paperwork-exempt: yes
parent 314474e2
Pipeline #11641 failed with stages
in 14 seconds
...@@ -758,7 +758,8 @@ the message being processed." ...@@ -758,7 +758,8 @@ the message being processed."
len mch lo newline) len mch lo newline)
;; If there are multiple lines in FROM, ;; If there are multiple lines in FROM,
;; discard up to the last newline in it. ;; discard up to the last newline in it.
(while (setq newline (string-match "\n" from)) (while (and (stringp from)
(setq newline (string-match "\n" from)))
(setq from (substring from (1+ newline)))) (setq from (substring from (1+ newline))))
(if (or (null from) (if (or (null from)
(string-match (string-match
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment