diff options
author | Glenn Morris <rgm@gnu.org> | 2019-02-15 13:25:31 -0800 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2019-02-15 13:25:31 -0800 |
commit | 92a2c737b9451271218baab13e7030c55a9fb260 (patch) | |
tree | 4152178487c38964b5cc32704bb1b7694940a933 /lisp/gnus/mm-view.el | |
parent | 38b442429bd0f15212960fb7fd37bd701cc8af3f (diff) | |
parent | 25d9fe24a657565761f79d7d96e22777a94aa84f (diff) | |
download | emacs-92a2c737b9451271218baab13e7030c55a9fb260.tar.gz emacs-92a2c737b9451271218baab13e7030c55a9fb260.tar.bz2 emacs-92a2c737b9451271218baab13e7030c55a9fb260.zip |
Merge from origin/emacs-26
25d9fe2 Work for empty MIME attachments (related to bug#34387)
Diffstat (limited to 'lisp/gnus/mm-view.el')
-rw-r--r-- | lisp/gnus/mm-view.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/gnus/mm-view.el b/lisp/gnus/mm-view.el index cf41c4595cb..b0d88d89843 100644 --- a/lisp/gnus/mm-view.el +++ b/lisp/gnus/mm-view.el @@ -370,10 +370,12 @@ (enriched-decode (point-min) (point-max)))) (mm-handle-set-undisplayer handle - `(lambda () - (let ((inhibit-read-only t)) - (delete-region ,(copy-marker (point-min) t) - ,(point-max-marker)))))))) + (if (= (point-min) (point-max)) + #'ignore + `(lambda () + (let ((inhibit-read-only t)) + (delete-region ,(copy-marker (point-min) t) + ,(point-max-marker))))))))) (defun mm-insert-inline (handle text) "Insert TEXT inline from HANDLE." |