16 lines
305 B
EmacsLisp
16 lines
305 B
EmacsLisp
;;; app/email/autoload/email.el
|
|
|
|
;;;###autoload
|
|
(defun =email ()
|
|
"Start email client."
|
|
(interactive)
|
|
(call-interactively 'mu4e))
|
|
|
|
;;;###autoload
|
|
(defun +email/compose ()
|
|
"Compose a new email."
|
|
(interactive)
|
|
;; TODO Interactively select email account
|
|
(call-interactively 'mu4e-compose-new))
|
|
|