From: Amin Bandali Date: Wed, 30 Oct 2019 16:49:10 +0000 (-0400) Subject: emacs: (defun b/insert-asterism () …) X-Git-Url: https://git.shemshak.org/~bandali/configs/commitdiff_plain/bc2f85e135e574e447729b37c25f73673e27c9b5 emacs: (defun b/insert-asterism () …) --- diff --git a/.emacs.d/init.el b/.emacs.d/init.el index f60c736..571448e 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -266,6 +266,10 @@ (previous-line) (insert "\n \n;;; ")) +(defun b/insert-asterism () + (interactive) + (insert "\n\n * * *\n\n")) + (defun b/no-mouse-autoselect-window () "Conveniently disable `focus-follows-mouse'. For disabling the behaviour for certain buffers and/or modes." @@ -1239,6 +1243,7 @@ This function is intended for use with `ivy-ignore-buffers'." (add-hook 'prog-mode-hook #'indicate-buffer-boundaries-left)) (use-feature text-mode + :bind (:map text-mode-map ("C-*" . b/insert-asterism)) :hook (text-mode . indicate-buffer-boundaries-left)) (use-feature conf-mode @@ -2408,6 +2413,7 @@ https://csclub.uwaterloo.ca/~abandali") mail-envelope-from 'header)) (use-feature message + :bind (:map message-mode-map ("" . b/insert-asterism)) :config ;; redefine for a simplified In-Reply-To header ;; (see https://todo.sr.ht/~sircmpwn/lists.sr.ht/67)