* cosmetic

This commit is contained in:
djcb
2013-05-04 14:15:35 +03:00
parent 5c95a1851d
commit d79e19b74b

View File

@ -1110,6 +1110,7 @@ list."
(mu4e-view-mark-for-unmark) (mu4e-view-mark-for-unmark)
(mu4e-message "Unmarking needs to be done in the header list view"))) (mu4e-message "Unmarking needs to be done in the header list view")))
(defmacro mu4e~view-defun-mark-for (mark) (defmacro mu4e~view-defun-mark-for (mark)
"Define a function mu4e-view-mark-for-MARK." "Define a function mu4e-view-mark-for-MARK."
(let ((funcname (intern (format "mu4e-view-mark-for-%s" mark))) (let ((funcname (intern (format "mu4e-view-mark-for-%s" mark)))
@ -1130,7 +1131,7 @@ list."
(mu4e~view-defun-mark-for unmark) (mu4e~view-defun-mark-for unmark)
(mu4e~view-defun-mark-for something) (mu4e~view-defun-mark-for something)
(defun mu4e-view-marked-execute () (defun mu4e-view-marked-execute ()
"Execute the marks." "Execute the marks."
(interactive) (interactive)
(mu4e~view-in-headers-context (mu4e~view-in-headers-context