contrapunctus
/
dotemacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Create my-mu4e-mkdir

This commit is contained in:
contrapunctus 2022-02-11 13:50:57 +05:30
parent fb06810c66
commit 4da3d07eb4
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
init.org
View File

@ -3042,7 +3042,8 @@ PR ideas
("r" . #'mu4e-headers-next)
("m" . #'mu4e-headers-mark-for-something)
("u" . #'mu4e-headers-mark-for-unmark)
("Q" . #'mu4e-mark-execute-all))
("Q" . #'mu4e-mark-execute-all)
("+" . #'my-mu4e-mkdir))
(:map mu4e-view-mode-map
("c" . #'mu4e-view-headers-prev)
("r" . #'mu4e-view-headers-next))
@ -3056,6 +3057,13 @@ PR ideas
mu4e-trash-folder "/Trash/"
;; Use vertico, not ido.
mu4e-completing-read-function #'completing-read))
(defun my-mu4e-mkdir ()
"Make new maildir."
(interactive)
(start-process "mu-mkdir" (generate-new-buffer-name "mu-mkdir")
"mu" "mkdir"
(expand-file-name (read-file-name "Make maildir: " (mu4e-root-maildir)))))
#+END_SRC
**** mu4e-alert