Drop `csetq' macro and use good old `setq' and `setq-default'.
[~bandali/configs] / .emacs.d / lisp / bandali-message.el
index 9715d5b..384326f 100644 (file)
@@ -1,6 +1,6 @@
 ;;; bandali-message.el --- bandali's message.el setup  -*- lexical-binding: t; -*-
 
 ;;; bandali-message.el --- bandali's message.el setup  -*- lexical-binding: t; -*-
 
-;; Copyright (C) 2018-2020  Amin Bandali
+;; Copyright (C) 2018-2022  Amin Bandali
 
 ;; Author: Amin Bandali <bandali@gnu.org>
 ;; Keywords: mail, news
 
 ;; Author: Amin Bandali <bandali@gnu.org>
 ;; Keywords: mail, news
@@ -49,7 +49,7 @@
            (concat "Hi %F,\n\n" b/message-cite-style-format)
          b/message-cite-style-format)))
     "Citation style based on Mozilla Thunderbird's. Use with message-cite-style.")
            (concat "Hi %F,\n\n" b/message-cite-style-format)
          b/message-cite-style-format)))
     "Citation style based on Mozilla Thunderbird's. Use with message-cite-style.")
-  (csetq
+  (setq
    message-elide-ellipsis "[...]\n"
    ;; message-cite-style 'message-cite-style-bandali
    message-citation-line-format "%N writes:\n"
    message-elide-ellipsis "[...]\n"
    ;; message-cite-style 'message-cite-style-bandali
    message-citation-line-format "%N writes:\n"
@@ -71,9 +71,9 @@
 
   ;; footnote
   ;; (with-eval-after-load 'footnote
 
   ;; footnote
   ;; (with-eval-after-load 'footnote
-  ;;   (csetq footnote-start-tag ""
-  ;;          footnote-end-tag   ""
-  ;;          footnote-style     'unicode))
+  ;;   (setq footnote-start-tag ""
+  ;;         footnote-end-tag   ""
+  ;;         footnote-style     'unicode))
 
   ;; custom newline & reformat function
   (defun b/message-newline-or-asterism (arg)
 
   ;; custom newline & reformat function
   (defun b/message-newline-or-asterism (arg)