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

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 117034
revision-id: address@hidden
parent: address@hidden
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Wed 2014-04-30 09:21:09 +0000
message:
  lisp/gnus/gnus-art.el (gnus-mm-display-part): Fix previous commit (again)
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:21:08 +0000
+++ b/lisp/gnus/gnus-art.el     2014-04-30 09:21:09 +0000
@@ -5671,8 +5671,6 @@
                 nil id
                 (gnus-article-mime-total-parts)
                 (mm-handle-media-type handle))))))
-      (if (window-live-p window)
-         (select-window window))
       (goto-char point)
       ;; Toggle the button appearance between `[button]...' and `[button]'.
       (let ((end (next-single-property-change point 'gnus-data)))
@@ -5684,7 +5682,9 @@
            (goto-char pt)
          ;; We're in the article header.
          (delete-char -1)))
-      (goto-char point))
+      (goto-char point)
+      (if (window-live-p window)
+         (select-window window)))
     retval))
 
 (defun gnus-article-goto-part (n)