summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAmin Bandali <bandali@gnu.org>2020-11-22 00:22:00 -0500
committerAmin Bandali <bandali@gnu.org>2020-11-22 00:22:00 -0500
commit23eb0d7a3000e3a721622c2450ab7a729cbe3f6c (patch)
treecdc1dd9ea2df7de9f8cba07fb03f15b9342d82c4
parentadba94a76d9411bc52b04bfb9b442f4c6c21c285 (diff)
downloadconfigs-23eb0d7a3000e3a721622c2450ab7a729cbe3f6c.tar.gz
configs-23eb0d7a3000e3a721622c2450ab7a729cbe3f6c.tar.xz
configs-23eb0d7a3000e3a721622c2450ab7a729cbe3f6c.zip
Use my own newline & reformat function for M-RET in message
-rw-r--r--.emacs.d/lisp/bandali-message.el15
1 files changed, 15 insertions, 0 deletions
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)