mu4e-main: small cleanups
This commit is contained in:
@ -247,8 +247,9 @@ character of the keyboard shortcut
|
|||||||
(defun mu4e--main-redraw ()
|
(defun mu4e--main-redraw ()
|
||||||
"Redraw the main buffer if there is one.
|
"Redraw the main buffer if there is one.
|
||||||
Otherwise, do nothing."
|
Otherwise, do nothing."
|
||||||
(when (buffer-live-p (get-buffer mu4e-main-buffer-name))
|
(when-let* ((buffer (get-buffer mu4e-main-buffer-name))
|
||||||
(with-current-buffer mu4e-main-buffer-name
|
(buffer (and (buffer-live-p buffer) buffer)))
|
||||||
|
(with-current-buffer buffer
|
||||||
(let* ((inhibit-read-only t)
|
(let* ((inhibit-read-only t)
|
||||||
(pos (point))
|
(pos (point))
|
||||||
(addrs (mu4e-personal-addresses))
|
(addrs (mu4e-personal-addresses))
|
||||||
@ -313,7 +314,6 @@ Otherwise, do nothing."
|
|||||||
(mu4e-main-mode)
|
(mu4e-main-mode)
|
||||||
(goto-char pos)))))
|
(goto-char pos)))))
|
||||||
|
|
||||||
|
|
||||||
(defun mu4e--main-view-queue ()
|
(defun mu4e--main-view-queue ()
|
||||||
"Display queue-related actions in the main view."
|
"Display queue-related actions in the main view."
|
||||||
(concat
|
(concat
|
||||||
|
|||||||
Reference in New Issue
Block a user