[emacs] update 7 drones

[~bandali/configs] / init.org

diff --git a/init.org b/init.org
index b7679a7..820714c 100644 (file)
--- a/init.org
+++ b/init.org
@@ -688,6 +688,8 @@ In short, my favourite way of life.
 
 (use-package org-notmuch
   :after (:any org notmuch))
 
 (use-package org-notmuch
   :after (:any org notmuch))

+
+(use-package orgalist)

 #+end_src
 
 **** asynchronous tangle
 #+end_src
 
 **** asynchronous tangle


@@ -965,7 +967,9 @@ TODO: break this giant source block down into individual org sections.
 
 (use-package recentf
   :demand t
 
 (use-package recentf
   :demand t

-  :config (add-to-list 'recentf-exclude "^/\\(?:ssh\\|su\\|sudo\\)?:"))
+  :config
+  (add-to-list 'recentf-exclude "^/\\(?:ssh\\|su\\|sudo\\)?:")
+  (setq recentf-max-saved-items 40))

 
 (use-package savehist
   :config (savehist-mode))
 
 (use-package savehist
   :config (savehist-mode))


@@ -1282,6 +1286,13 @@ instead.
   :hook (web-mode css-mode html-mode sgml-mode))
 #+end_src
 
   :hook (web-mode css-mode html-mode sgml-mode))
 #+end_src
 

+** Nix
+
+#+begin_src emacs-lisp
+(use-package nix-mode
+  :mode "\\.nix\\'")
+#+end_src
+

 * Emacs Enhancements
 
 ** [[https://github.com/justbur/emacs-which-key][which-key]]
 * Emacs Enhancements
 
 ** [[https://github.com/justbur/emacs-which-key][which-key]]


@@ -1452,42 +1463,39 @@ Also see [[https://www.emacswiki.org/emacs/rebox2][rebox2]].
 #+end_src
 
 * Email
 #+end_src
 
 * Email

-** [[https://notmuchmail.org][notmuch]]
-
-See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].

 
 #+begin_src emacs-lisp
 
 #+begin_src emacs-lisp

-(defvar amin-maildir "~/mail")
+(defvar amin-maildir (expand-file-name "~/mail/"))
+(after! recentf
+  (add-to-list 'recentf-exclude amin-maildir))
+#+end_src
+
+** sendmail

 
 

+#+begin_src emacs-lisp

 (use-package sendmail
 (use-package sendmail

-  ;; :ensure nil

   :config
   (setq sendmail-program "/usr/bin/msmtp"
   :config
   (setq sendmail-program "/usr/bin/msmtp"

-        ; message-sendmail-extra-arguments '("-v" "-d")
+        ;; message-sendmail-extra-arguments '("-v" "-d")

         mail-specify-envelope-from t
         mail-envelope-from 'header))
         mail-specify-envelope-from t
         mail-envelope-from 'header))

+#+end_src
+
+** message

 
 

+#+begin_src emacs-lisp

 (use-package message
 (use-package message

-  ;; :ensure nil

   :config
   (setq message-kill-buffer-on-exit t
         message-send-mail-function 'message-send-mail-with-sendmail
         message-sendmail-envelope-from 'header
   :config
   (setq message-kill-buffer-on-exit t
         message-send-mail-function 'message-send-mail-with-sendmail
         message-sendmail-envelope-from 'header

-        message-directory "drafts"
+        ;; message-directory "drafts"

         message-user-fqdn "aminb.org")
   (add-hook 'message-mode-hook
             (lambda () (setq fill-column 65
                         message-fill-column 65)))
   (add-hook 'message-mode-hook
             #'flyspell-mode)
         message-user-fqdn "aminb.org")
   (add-hook 'message-mode-hook
             (lambda () (setq fill-column 65
                         message-fill-column 65)))
   (add-hook 'message-mode-hook
             #'flyspell-mode)

-  ;; (add-hook 'notmuch-message-mode-hook #'+doom-modeline|set-special-modeline)
-  ;; TODO: is there a way to only run this when replying and not composing?
-  ;; (add-hook 'notmuch-message-mode-hook
-  ;;           (lambda () (progn
-  ;;                   (newline)
-  ;;                   (newline)
-  ;;                   (forward-line -1)
-  ;;                   (forward-line -1))))

   ;; (add-hook 'message-setup-hook
   ;;           #'mml-secure-message-sign-pgpmime)
   )
   ;; (add-hook 'message-setup-hook
   ;;           #'mml-secure-message-sign-pgpmime)
   )


@@ -1495,7 +1503,13 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
 (after! mml-sec
   (setq mml-secure-openpgp-encrypt-to-self t
         mml-secure-openpgp-sign-with-sender t))
 (after! mml-sec
   (setq mml-secure-openpgp-encrypt-to-self t
         mml-secure-openpgp-sign-with-sender t))

+#+end_src
+
+** [[https://notmuchmail.org][notmuch]]
+
+See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].

 
 

+#+begin_src emacs-lisp

 (defun amin/notmuch ()
   "Delete other windows, then launch `notmuch'."
   (interactive)
 (defun amin/notmuch ()
   "Delete other windows, then launch `notmuch'."
   (interactive)


@@ -1504,7 +1518,7 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
 
 (use-package notmuch
   :commands notmuch
 
 (use-package notmuch
   :commands notmuch

-  :bind ("C-c m" . amin/notmuch)
+  :bind ("C-c n" . amin/notmuch)

   :custom (notmuch-always-prompt-for-sender t)
   :config
   (setq notmuch-hello-sections
   :custom (notmuch-always-prompt-for-sender t)
   :config
   (setq notmuch-hello-sections


@@ -1614,9 +1628,6 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
 
 (after! notmuch-crypto
   (setq notmuch-crypto-process-mime t))
 
 (after! notmuch-crypto
   (setq notmuch-crypto-process-mime t))

-
-(after! recentf
-  (add-to-list 'recentf-exclude (expand-file-name amin-maildir)))

 #+end_src
 
 ** supercite
 #+end_src
 
 ** supercite