diff options
| author | dick | 2021-06-13 15:02:11 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-06-13 15:02:27 +0200 |
| commit | 55d7effbe1d8edae94ec9ebcd061cd2221df97e4 (patch) | |
| tree | 9dda2de1f75e60b56e4870a67667ace242a56a61 | |
| parent | bad87a162c15a0f23063609e0dde5b0654153dcd (diff) | |
| download | emacs-55d7effbe1d8edae94ec9ebcd061cd2221df97e4.tar.gz emacs-55d7effbe1d8edae94ec9ebcd061cd2221df97e4.zip | |
Avoid an infinite loop in mml-expand-html-into-multipart-related
* lisp/gnus/mml.el (mml-expand-html-into-multipart-related):
Skip images with empty filename parts (bug#49001).
| -rw-r--r-- | lisp/gnus/mml.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el index dcc9ea51dd2..5f35e73cd7c 100644 --- a/lisp/gnus/mml.el +++ b/lisp/gnus/mml.el | |||
| @@ -550,7 +550,7 @@ type detected." | |||
| 550 | (end (point)) | 550 | (end (point)) |
| 551 | (parsed (url-generic-parse-url (cdr (assq 'src (cadr img)))))) | 551 | (parsed (url-generic-parse-url (cdr (assq 'src (cadr img)))))) |
| 552 | (when (and (null (url-type parsed)) | 552 | (when (and (null (url-type parsed)) |
| 553 | (url-filename parsed) | 553 | (not (zerop (length (url-filename parsed)))) |
| 554 | (file-exists-p (url-filename parsed))) | 554 | (file-exists-p (url-filename parsed))) |
| 555 | (goto-char start) | 555 | (goto-char start) |
| 556 | (when (search-forward (url-filename parsed) end t) | 556 | (when (search-forward (url-filename parsed) end t) |