emacs
/
mu
mirror of https://github.com/djcb/mu.git
1
0
Fork 0
Code Issues Releases Wiki Activity

* mu4e-utils.el: warn when no actions are defined + some cosmetics

This commit is contained in:
djcb 2012-04-20 08:46:05 +03:00
parent bff93c9962
commit e0db2dcfb2
1 changed files with 18 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
emacs/mu4e-utils.el
View File

@ -397,11 +397,13 @@ point in eiter the headers buffer or the view buffer."
is a list of actions like `mu4e-view-attachments-actions',
`mu4e-view-actions', `mu4e-header-actions'. Then, call the function
for this action, with the currrent message plist as the argument."
(let ((kar (mu4e-read-option prompt actions)))
(dolist (action actions)
(let ((shortcut (cadr action)) (func (nth 2 action)))
(when (eq kar shortcut)
(funcall func msg))))))
(if (null actions)
(message "No actions of this type defined")
(let ((kar (mu4e-read-option prompt actions)))
(dolist (action actions)
(let ((shortcut (cadr action)) (func (nth 2 action)))
(when (eq kar shortcut)
(funcall func msg)))))))
(defun mu4e-capture-message ()
"Capture the path of the message at point."