diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/net/shr.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el index ab7240c8c3d..ad5d869531c 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el | |||
| @@ -994,7 +994,8 @@ If EXTERNAL, browse the URL using `shr-external-browser'." | |||
| 994 | data) | 994 | data) |
| 995 | (let ((param (match-string 4 data)) | 995 | (let ((param (match-string 4 data)) |
| 996 | (payload (url-unhex-string (match-string 5 data)))) | 996 | (payload (url-unhex-string (match-string 5 data)))) |
| 997 | (when (string-match "^.*\\(;[ \t]*base64\\)$" param) | 997 | (when (and param |
| 998 | (string-match "^.*\\(;[ \t]*base64\\)$" param)) | ||
| 998 | (setq payload (ignore-errors | 999 | (setq payload (ignore-errors |
| 999 | (base64-decode-string payload)))) | 1000 | (base64-decode-string payload)))) |
| 1000 | payload))) | 1001 | payload))) |