From: Amin Bandali Date: Sun, 22 Nov 2020 05:22:00 +0000 (-0500) Subject: Use my own newline & reformat function for M-RET in message X-Git-Url: https://git.shemshak.org/~bandali/configs/commitdiff_plain/23eb0d7a3000e3a721622c2450ab7a729cbe3f6c?hp=adba94a76d9411bc52b04bfb9b442f4c6c21c285 Use my own newline & reformat function for M-RET in message --- diff --git a/.emacs.d/lisp/bandali-message.el b/.emacs.d/lisp/bandali-message.el index 49b8a98..5952b52 100644 --- a/.emacs.d/lisp/bandali-message.el +++ b/.emacs.d/lisp/bandali-message.el @@ -88,6 +88,21 @@ (orgalist-mode 1) (yas-minor-mode 1))) + ;; custom newline & reformat function + (defun b/message-newline-or-asterism (arg) + "Create newlines per my liking or insert asterism if ARG is +non-nil." + (interactive "P") + (if arg + (b/insert-asterism) + (progn + (beginning-of-line) + (delete-region (point) (line-end-position)) + (newline) + (open-line 1)))) + (define-key message-mode-map + (kbd "M-RET") #'b/message-newline-or-asterism) + ;; local key bindings (defvar b/footnote-prefix-map) (define-prefix-command 'b/footnote-prefix-map)