summaryrefslogtreecommitdiff
path: root/lisp/gnus
diff options
context:
space:
mode:
authordick <dick.r.chiang@gmail.com>2021-06-13 15:02:11 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2021-06-13 15:02:27 +0200
commit55d7effbe1d8edae94ec9ebcd061cd2221df97e4 (patch)
tree9dda2de1f75e60b56e4870a67667ace242a56a61 /lisp/gnus
parentbad87a162c15a0f23063609e0dde5b0654153dcd (diff)
downloademacs-55d7effbe1d8edae94ec9ebcd061cd2221df97e4.tar.gz
emacs-55d7effbe1d8edae94ec9ebcd061cd2221df97e4.tar.bz2
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).
Diffstat (limited to 'lisp/gnus')
-rw-r--r--lisp/gnus/mml.el2
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."
(end (point))
(parsed (url-generic-parse-url (cdr (assq 'src (cadr img))))))
(when (and (null (url-type parsed))
- (url-filename parsed)
+ (not (zerop (length (url-filename parsed))))
(file-exists-p (url-filename parsed)))
(goto-char start)
(when (search-forward (url-filename parsed) end t)