[Emacs-diffs] trunk r117033: lisp/gnus/gnus-art.el (gnus-mm-display-part): Fix previous commit

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 117033
revision-id: address@hidden
parent: address@hidden
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Wed 2014-04-30 04:21:08 +0000
message:
  lisp/gnus/gnus-art.el (gnus-mm-display-part): Fix previous commit
modified:
  lisp/gnus/gnus-art.el          gnusart.el-20091113204419-o5vbwnq5f7feedwu-1108

=== modified file 'lisp/gnus/gnus-art.el'
--- a/lisp/gnus/gnus-art.el     2014-04-30 04:05:27 +0000
+++ b/lisp/gnus/gnus-art.el     2014-04-30 04:21:08 +0000
@@ -5679,7 +5679,11 @@
        (delete-region (previous-single-property-change end 'gnus-data) end))
       (gnus-insert-mime-button
        handle id (list (mm-handle-displayed-p handle)))
-      (delete-char -1)
+      (let ((pt (point)))
+       (if (search-backward "\n\n" nil t)
+           (goto-char pt)
+         ;; We're in the article header.
+         (delete-char -1)))
       (goto-char point))
     retval))