1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-07 15:21:46 +00:00

Ignore invalid base64 encoded embedded images

* lisp/net/shr.el (shr-image-from-data): Ignore invalid base64
encoded embedded images (bug#22928).
This commit is contained in:
Lars Magne Ingebrigtsen 2016-03-20 13:57:11 +01:00
parent 4f6ea3988b
commit f2da80d0e1

View File

@ -946,7 +946,8 @@ If EXTERNAL, browse the URL using `shr-external-browser'."
(let ((param (match-string 4 data))
(payload (url-unhex-string (match-string 5 data))))
(when (string-match "^.*\\(;[ \t]*base64\\)$" param)
(setq payload (base64-decode-string payload)))
(setq payload (ignore-errors
(base64-decode-string payload))))
payload)))
;; Behind display-graphic-p test.