alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Check for detached view in the navigation context macro

Browse Source
This commit is contained in:
Mickey Petersen
2022-11-30 15:33:07 +00:00
parent 8d2b75219f
commit d6c67a401d
2 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
mu4e/mu4e-view.el
View File

@ -156,7 +156,10 @@ Then, display the results."
;; are we already inside a headers buffer? ;; are we already inside a headers buffer?
((mu4e-current-buffer-type-p 'headers) (current-buffer)) ((mu4e-current-buffer-type-p 'headers) (current-buffer))
;; if not, are we inside a view buffer, and does it have linked headers buffer? ;; if not, are we inside a view buffer, and does it have linked headers buffer?
((mu4e-current-buffer-type-p 'view) (mu4e-get-headers-buffer)) ((mu4e-current-buffer-type-p 'view)
(when (mu4e--view-detached-p (current-buffer))
(mu4e-error "You cannot navigate in a detached view buffer."))
(mu4e-get-headers-buffer))
;; fallback; but what would trigger this? ;; fallback; but what would trigger this?
(t (mu4e-get-headers-buffer)))) (t (mu4e-get-headers-buffer))))
(docid (mu4e-message-field msg :docid))) (docid (mu4e-message-field msg :docid)))

3
mu4e/mu4e-window.el
View File

@ -80,7 +80,8 @@ generated name does not already exist."
;; detached -- raise an error. ;; detached -- raise an error.
(and (mu4e-current-buffer-type-p 'view) (and (mu4e-current-buffer-type-p 'view)
(or mu4e-linked-headers-buffer (or mu4e-linked-headers-buffer
(error "This view buffer is detached"))) ;; (error "This view buffer is detached")
))
;; if we're already in a headers buffer then ;; if we're already in a headers buffer then
;; that is the one we use. ;; that is the one we use.
(and (mu4e-current-buffer-type-p 'headers) (and (mu4e-current-buffer-type-p 'headers)