Bugfixes to make `gnus-mime-save-part-and-strip' work again

[gnus] / lisp / gnus-art.el

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index d2cf73f..5566b0e 100644 (file)
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -5737,7 +5737,7 @@ all parts."
                        `(lambda ()
                           (let ((inhibit-read-only t))
                             (delete-region ,(copy-marker (point-min) t)
-                                           ,(point-max-marker)))))))
+                                           ,(copy-marker (point-max) t)))))))
                    (part
                     (mm-display-inline handle))))))
       (goto-char point)