From: Amin Bandali <bandali@gnu.org>
Date: Wed, 21 Nov 2018 05:07:15 +0000 (-0500)
Subject: [emacs] try out a custom message-cite-style instead of supercite
X-Git-Url: https://git.shemshak.org/~bandali/configs/commitdiff_plain/c7edd059af577713696c235c46ee2b3f7514ee1b?ds=inline

[emacs] try out a custom message-cite-style instead of supercite
---

diff --git a/init.org b/init.org
index b30aebc..defa13d 100644
--- a/init.org
+++ b/init.org
@@ -2137,7 +2137,17 @@ For when I /have to/ use GH.
 #+begin_src emacs-lisp
 (use-package message
   :config
-  (setq message-kill-buffer-on-exit t
+  (defconst message-cite-style-bandali
+    '((message-cite-function  'message-cite-original)
+      (message-citation-line-function  'message-insert-formatted-citation-line)
+      (message-cite-reply-position 'traditional)
+      (message-yank-prefix  "> ")
+      (message-yank-cited-prefix  ">")
+      (message-yank-empty-prefix  ">")
+      (message-citation-line-format "Hi %F,\n\nOn %Y-%m-%d %l:%M %p, %N wrote:"))
+    "Citation style based on Mozilla Thunderbird's. Use with message-cite-style.")
+  (setq message-cite-style 'message-cite-style-bandali
+        message-kill-buffer-on-exit t
         message-send-mail-function 'message-send-mail-with-sendmail
         message-sendmail-envelope-from 'header
         message-dont-reply-to-names
@@ -2181,7 +2191,7 @@ Convenient footnotes in =message-mode=.
         footnote-style     'unicode))
 #+end_src
 
-** supercite
+** COMMENT supercite
 
 #+begin_src emacs-lisp
 (use-package supercite