From 4da3d07eb48da27878ea1cd8747fce3d5ea441df Mon Sep 17 00:00:00 2001 From: contrapunctus Date: Fri, 11 Feb 2022 13:50:57 +0530 Subject: [PATCH] Create my-mu4e-mkdir --- init.org | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/init.org b/init.org index 629bf06..3dc81d9 100644 --- a/init.org +++ b/init.org @@ -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