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))
|
||
|
|