From d1bef1a8fa9255701fd8eda4eb670c7c31f21c9a Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Wed, 25 Feb 2015 02:39:26 +0000 Subject: [PATCH] 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/ChangeLog | 7 +++++++ lisp/mm-decode.el | 2 +- lisp/mm-view.el | 2 +- 3 files changed, 9 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3123c89c6..c4a43df1e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2015-02-25 Katsumi Yamaoka + + * 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 * mailcap.el (mailcap-mime-data): Support `pdf-view-mode' (from PDF diff --git a/lisp/mm-decode.el b/lisp/mm-decode.el index 459c7935f..ae6bb71df 100644 --- a/lisp/mm-decode.el +++ b/lisp/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/mm-view.el b/lisp/mm-view.el index 4b520edf1..a3d6e74fb 100644 --- a/lisp/mm-view.el +++ b/lisp/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) -- 2.25.1