diff options
Diffstat (limited to '.emacs.d/tempel-templates')
| -rw-r--r-- | .emacs.d/tempel-templates | 214 |
1 files changed, 0 insertions, 214 deletions
diff --git a/.emacs.d/tempel-templates b/.emacs.d/tempel-templates deleted file mode 100644 index 0613c00..0000000 --- a/.emacs.d/tempel-templates +++ /dev/null @@ -1,214 +0,0 @@ -emacs-lisp-mode - -(autoload ";;;###autoload") -(lambda "(lambda (" p ")" n> r> ")") -(defvar "(defvar " p "\n \"" p "\")") -(defvar-local "(defvar-local " p "\n \"" p "\")") -(const "(defconst " p "\n \"" p "\")") -(custom "(defcustom " p "\n \"" p "\"" n> ":type '" p ")") -(defface "(defface " p " '((t :inherit " p "))\n \"" p "\")") -(defgroup "(defgroup " p " nil\n \"" p "\"" n> ":group '" p n> ":prefix \"" p "-\")") -(defmacro "(defmacro " p " (" p ")\n \"" p "\"" n> r> ")") -(defalias "(defalias '" p " '" p ")") -(defun "(defun " p " (" p ")\n \"" p "\"" n> r> ")") -(defcustom "(defun " p " (" p ")\n \"" p "\"" n> "(interactive" p ")" n> r> ")") -(if-let "(if-let (" p ")" n> r> ")") -(when-let "(when-let (" p ")" n> r> ")") -(if-let* "(if-let* (" p ")" n> r> ")") -(when-let* "(when-let* (" p ")" n> r> ")") -(cond "(cond" n "(" q "))" >) -(pcase "(pcase " p n "(" q "))" >) -(let "(let (" p ")" n> r> ")") -(let* "(let* (" p ")" n> r> ")") -(dotimes "(dotimes (" p ")" n> r> ")") -(dolist "(dolist (" p ")" n> r> ")") - -(agpl - ";; Copyright (C) " (p (format-time-string "%Y" (current-time)) year) " Free Software Foundation. - -;; Author: " (p user-full-name) " <" (p user-mail-address) "> -;; Package-Requires: " (format "((emacs \"%d.%d\"))" - emacs-major-version - emacs-minor-version) " - -;; This file is part of " (p (file-name-nondirectory (directory-file-name (project-root (project-current)))) project) ". - -;; " (s project) " is free software: you can redistribute it and/or modify it under -;; the terms of the GNU Affero General Public License as published by -;; the Free Software Foundation, either version 3 of the License, or -;; (at your option) any later version. - -;; " (s project) " is distributed in the hope that it will be useful, but WITHOUT -;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -;; or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Affero General -;; Public License for more details. - -;; You should have received a copy of the GNU Affero General Public -;; License along with " (s project) ". If not, see <https://www.gnu.org/licenses/>. -") - -fundamental-mode ;; Available everywhere - -(today (format-time-string "%Y-%m-%d %a")) -(now (format-time-string "%Y-%m-%d %a %H:%M")) - -prog-mode - -(fixme (if (derived-mode-p 'emacs-lisp-mode) ";; " comment-start) "FIXME: ") -(todo (if (derived-mode-p 'emacs-lisp-mode) ";; " comment-start) "TODO: ") -(bug (if (derived-mode-p 'emacs-lisp-mode) ";; " comment-start) "BUG: ") -(hack (if (derived-mode-p 'emacs-lisp-mode) ";; " comment-start) "HACK: ") - -latex-mode - -(abstract "\\begin{abstract}\n" r> n> "\\end{abstract}") -(align "\\begin{align}\n" r> n> "\\end{align}") -(alignn "\\begin{align*}\n" r> n> "\\end{align*}") -(gather "\\begin{gather}\n" r> n> "\\end{gather}") -(gatherr "\\begin{gather*}\n" r> n> "\\end{gather*}") -(appendix "\\begin{appendix}\n" r> n> "\\end{appendix}") -(begin "\\begin{" (s env) "}" r> n> "\\end{" (s env) "}") -(center "\\begin{center}\n" r> n> "\\end{center}") -(displaymath "\\begin{displaymath}\n" r> n> "\\end{displaymath}") -(document "\\begin{document}\n" r> n> "\\end{document}") -(enumerate "\\begin{enumerate}\n\\item " r> n> "\\end{enumerate}") -(equation "\\begin{equation}" r> n> "\\end{equation}") -(flushleft "\\begin{flushleft}" r> n> "\\end{flushleft}") -(flushright "\\begin{flushright}" r> n> "\\end{flushright}") -(frac "\\frac{" p "}{" q "}") -(fussypar "\\begin{fussypar}" r> n> "\\end{fussypar}") -(itemize "\\begin{itemize}\n\\item " r> n> "\\end{itemize}") -(letter "\\begin{letter}\n" r> n> "\\end{letter}") -(math "\\begin{math}\n" r> n> "\\end{math}") -(minipage "\\begin{minipage}[t]{0.5\linewidth}\n" r> n> "\\end{minipage}") -(quotation "\\begin{quotation}\n" r> n> "\\end{quotation}") -(quote "\\begin{quote}\n" r> n> "\\end{quote}") -(sloppypar "\\begin{sloppypar}\n" r> n> "\\end{sloppypar}") -(theindex "\\begin{theindex}\n" r> n> "\\end{theindex}") -(trivlist "\\begin{trivlist}\n" r> n> "\\end{trivlist}") -(verbatim "\\begin{verbatim}\n" r> n> "\\end{verbatim}") -(verbatimm "\\begin{verbatim*}\n" r> n> "\\end{verbatim*}") - -texinfo-mode - -(defmac "@defmac " p n> r> "@end defmac") -(defun "@defun " p n> r> "@end defun") -(defvar "@defvar " p n> r> "@end defvar") -(example "@example " p n> r> "@end example") -(lisp "@lisp " p n> r> "@end lisp") -(bullet "@itemize @bullet{}" n> r> "@end itemize") -(code "@code{" p "}") -(var "@var{" p "}") - -lisp-mode emacs-lisp-mode ;; Specify multiple modes - -(lambda "(lambda (" p ")" n> r> ")") - -emacs-lisp-mode - -(autoload ";;;###autoload") -(pt "(point)") -(lambda "(lambda (" p ")" n> r> ")") -(var "(defvar " p "\n \"" p "\")") -(local "(defvar-local " p "\n \"" p "\")") -(const "(defconst " p "\n \"" p "\")") -(custom "(defcustom " p "\n \"" p "\"" n> ":type '" p ")") -(face "(defface " p " '((t :inherit " p "))\n \"" p "\")") -(group "(defgroup " p " nil\n \"" p "\"" n> ":group '" p n> ":prefix \"" p "-\")") -(macro "(defmacro " p " (" p ")\n \"" p "\"" n> r> ")") -(alias "(defalias '" p " '" p ")") -(fun "(defun " p " (" p ")\n \"" p "\"" n> r> ")") -(iflet "(if-let (" p ")" n> r> ")") -(whenlet "(when-let (" p ")" n> r> ")") -(whilelet "(while-let (" p ")" n> r> ")") -(andlet "(and-let* (" p ")" n> r> ")") -(cond "(cond" n "(" q "))" >) -(pcase "(pcase " (p "scrutinee") n "(" q "))" >) -(let "(let (" p ")" n> r> ")") -(lett "(let* (" p ")" n> r> ")") -(pcaselet "(pcase-let (" p ")" n> r> ")") -(pcaselett "(pcase-let* (" p ")" n> r> ")") -(rec "(letrec (" p ")" n> r> ")") -(dotimes "(dotimes (" p ")" n> r> ")") -(dolist "(dolist (" p ")" n> r> ")") -(loop "(cl-loop for " p " in " p " do" n> r> ")") -(command "(defun " p " (" p ")\n \"" p "\"" n> "(interactive" p ")" n> r> ")") -(advice "(defun " (p "adv" name) " (&rest app)" n> p n> "(apply app))" n> - "(advice-add #'" (p "fun") " " (p ":around") " #'" (s name) ")") - -(header ";;; " (file-name-nondirectory (or (buffer-file-name) (buffer-name))) - " -- " (p "short-desc" short-desc) " -*- lexical-binding: t -*-" n n - (i agpl) n - ";;; Commentary: - -;; " (s short-desc) "." p n n - ";;; Code:" n n) - -(lb ";; -*- lexical-binding: t; -*-" n n) - -(provide "(provide '" (file-name-base (or (buffer-file-name) (buffer-name))) ")" n - ";;; " (file-name-nondirectory (or (buffer-file-name) (buffer-name))) - " ends here" n) - -eshell-mode - -(for "for " (p "i") " in " p " { " q " }") -(while "while { " p " } { " q " }") -(until "until { " p " } { " q " }") -(if "if { " p " } { " q " }") -(ife "if { " p " } { " p " } { " q " }") -(unl "unless { " p " } { " q " }") -(unle "unless { " p " } { " p " } { " q " }") - -text-mode - -(box "┌─" (make-string (length str) ?─) "─┐" n - "│ " (s str) " │" n - "└─" (make-string (length str) ?─) "─┘" n) -(abox "+-" (make-string (length str) ?-) "-+" n - "| " (s str) " |" n - "+-" (make-string (length str) ?-) "-+" n) -(cut "--8<---------------cut here---------------start------------->8---" n r n - "--8<---------------cut here---------------end--------------->8---" n) -(rot13 (p "plain text" text) n "----" n (rot13 text)) -(calc (p "taylor(sin(x),x=0,3)" formula) n "----" n (format "%s" (calc-eval formula))) - -rst-mode - -(title (make-string (length title) ?=) n (p "Title: " title) n (make-string (length title) ?=) n) - -java-mode - -(class "public class " (p (file-name-base (or (buffer-file-name) (buffer-name)))) " {" n> r> n "}") - -c-mode :when (re-search-backward "^\\S-*$" (line-beginning-position) 'noerror) - -(inc "#include <" (p (concat (file-name-base (or (buffer-file-name) (buffer-name))) ".h")) ">") -(incc "#include \"" (p (concat (file-name-base (or (buffer-file-name) (buffer-name))) ".h")) "\"") - -org-mode - -(caption "#+caption: ") -(drawer ":" p ":" n r ":end:") -(begin "#+begin_" (s name) n> r> n "#+end_" name) -(quote "#+begin_quote" n> r> n "#+end_quote") -(sidenote "#+begin_sidenote" n> r> n "#+end_sidenote") -(marginnote "#+begin_marginnote" n> r> n "#+end_marginnote") -(example "#+begin_example" n> r> n "#+end_example") -(center "#+begin_center" n> r> n "#+end_center") -(ascii "#+begin_export ascii" n> r> n "#+end_export") -(html "#+begin_export html" n> r> n "#+end_export") -(latex "#+begin_export latex" n> r> n "#+end_export") -(comment "#+begin_comment" n> r> n "#+end_comment") -(verse "#+begin_verse" n> r> n "#+end_verse") -(src "#+begin_src " q n> r> n "#+end_src") -(gnuplot "#+begin_src gnuplot :var data=" (p "table") " :file " (p "plot.png") n> r> n "#+end_src" :post (org-edit-src-code)) -(elisp "#+begin_src emacs-lisp" n> r> n "#+end_src" :post (org-edit-src-code)) -(inlsrc "src_" p "{" q "}") -(title "#+title: " p n "#+author: " (user-full-name) n "#+language: en") - - -;; Local Variables: -;; mode: lisp-data -;; outline-regexp: "[a-z]" -;; End: |