* mu4e-view.el: emacs23 work-around hack for missing `window-parent' function
This commit is contained in:
@ -539,9 +539,14 @@ citations."
|
|||||||
(interactive)
|
(interactive)
|
||||||
(when (buffer-live-p mu4e-view-buffer)
|
(when (buffer-live-p mu4e-view-buffer)
|
||||||
(with-current-buffer mu4e-view-buffer
|
(with-current-buffer mu4e-view-buffer
|
||||||
(if (window-parent)
|
(if (fboundp 'window-parent) ;; window-parent is an emacs24ism
|
||||||
(kill-buffer-and-window)
|
(if (window-parent)
|
||||||
(kill-buffer)))))
|
(kill-buffer-and-window)
|
||||||
|
(kill-buffer))
|
||||||
|
;; emacs23 hack: trial and error
|
||||||
|
(condition-case nil
|
||||||
|
(kill-buffer-and-window)
|
||||||
|
(kill-buffer))))))
|
||||||
|
|
||||||
(defun mu4e-view-action (&optional msg)
|
(defun mu4e-view-action (&optional msg)
|
||||||
"Ask user for some action to apply on MSG (or message-at-point,
|
"Ask user for some action to apply on MSG (or message-at-point,
|
||||||
|
|||||||
Reference in New Issue
Block a user