templates

emacs-lisp-mode

(autoload ";;;###autoload")
(let "(let (" p ")" n> r> ")")
(lett "(let* (" p ")" n> r> ")")

fundamental-mode

(now (barrinalo-date-short-with-time))
(Now (barrinalo-date-long-with-time))
(today (barrinalo-date-short))
(Today (barrinalo-date-long))

js-base-mode typescript-ts-base-mode

(c "const " p " = " p ";")
(f "const " p " = (" p ") => " p ";")
(l "console.log(" r ");")
(L "console.log(JSON.stringify(" r ", null, 2));")

org-mode

(q "#+BEGIN_QUOTE" n> r> n "#+END_QUOTE")
(s "#+BEGIN_SRC " (p "emacs-lisp") n> r> n "#+END_SRC")

prog-mode

(note
 (if (derived-mode-p 'emacs-lisp-mode 'lisp-data-mode) ";; " comment-start)
 "NOTE ")
(todo
 (if (derived-mode-p 'emacs-lisp-mode 'lisp-data-mode) ";; " comment-start)
 "TODO ")
(warn
 (if (derived-mode-p 'emacs-lisp-mode 'lisp-data-mode) ";; " comment-start)
 "WARN ")

text-mode

(box "&#9484;&#9472;" (make-string (length str) ?&#9472;) "&#9472;&#9488;" n
     "&#9474; " (s str)                       " &#9474;" n
     "&#9492;&#9472;" (make-string (length str) ?&#9472;) "&#9472;&#9496;" n)
(k "<kbd>" p "</kbd>")

;; Local Variables:
;; mode: lisp-data
;; outline-regexp: "[a-z]"
;; End: