[Emacs-diffs] master b86ba30: Gnus: Revert my bogus changes (2014-06-05)

[Katsumi Yamaoka]

branch: master
commit b86ba30d17abcc85c73ad47ed95f15147508538c
Author: Katsumi Yamaoka <address@hidden>
Commit: Katsumi Yamaoka <address@hidden>

    Gnus: Revert my bogus changes (2014-06-05)
    
    * mm-decode.el (mm-shr)
    * mm-view.el (mm-inline-text-html-render-with-w3m):
    Revert my bogus change that made the start marker of a part
    the "moves after insertion" type.
---
 lisp/gnus/ChangeLog    |    7 +++++++
 lisp/gnus/mm-decode.el |    2 +-
 lisp/gnus/mm-view.el   |    2 +-
 3 files changed, 9 insertions(+), 2 deletions(-)

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 7a4c463..671e171 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,10 @@
+2015-02-25  Katsumi Yamaoka  <address@hidden>
+
+       * mm-decode.el (mm-shr)
+       * mm-view.el (mm-inline-text-html-render-with-w3m):
+       Revert my bogus change that made the start marker of a part
+       the "moves after insertion" type.
+
 2015-02-23  Tassilo Horn  <address@hidden>
 
        * mailcap.el (mailcap-mime-data): Support `pdf-view-mode' (from PDF
diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el
index 459c793..ae6bb71 100644
--- a/lisp/gnus/mm-decode.el
+++ b/lisp/gnus/mm-decode.el
@@ -1895,7 +1895,7 @@ If RECURSIVE, search recursively."
        handle
        `(lambda ()
          (let ((inhibit-read-only t))
-           (delete-region ,(copy-marker (point-min) t)
+           (delete-region ,(point-min-marker)
                           ,(point-max-marker))))))))
 
 (defvar shr-map)
diff --git a/lisp/gnus/mm-view.el b/lisp/gnus/mm-view.el
index 4b520ed..a3d6e74 100644
--- a/lisp/gnus/mm-view.el
+++ b/lisp/gnus/mm-view.el
@@ -217,7 +217,7 @@
         handle
         `(lambda ()
            (let ((inhibit-read-only t))
-             (delete-region ,(copy-marker (point-min) t)
+             (delete-region ,(point-min-marker)
                             ,(point-max-marker)))))))))
 
 (defvar mm-w3m-standalone-supports-m17n-p (if (featurep 'mule) 'undecided)