gnus-art.el (gnus-mm-display-part): Fix previous commit (again)
authorKatsumi Yamaoka <yamaoka@jpl.org>
Wed, 30 Apr 2014 09:20:57 +0000 (09:20 +0000)
committerKatsumi Yamaoka <yamaoka@jpl.org>
Wed, 30 Apr 2014 09:20:57 +0000 (09:20 +0000)
lisp/gnus-art.el

index 0b2d17f..9c8004f 100644 (file)
@@ -5672,8 +5672,6 @@ all parts."
                 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)))
@@ -5685,7 +5683,9 @@ all parts."
            (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)