[elpa] externals/tempel 76568bb5ba 1/2: README: Add a bunch of more example templates

[ELPA Syncer]

branch: externals/tempel
commit 76568bb5ba75c7d90aa333c367cf934ae4c7a7a4
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    README: Add a bunch of more example templates
---
 README.org | 26 ++++++++++++++++++++++----
 1 file changed, 22 insertions(+), 4 deletions(-)

diff --git a/README.org b/README.org
index 655fed94cc..62fd52bed0 100644
--- a/README.org
+++ b/README.org
@@ -123,8 +123,8 @@ post-expansion operations can be specified per template by 
the optional keys
 
   latex-mode
 
-  (begin "\\begin{" (s env) "}" > n> r> "\\end{" (s env) "}")
-  (frac "\\frac{" p "}{" p "}")
+  (begin "\\begin{" (s env) "}" r> n> "\\end{" (s env) "}")
+  (frac "\\frac{" p "}{" q "}")
   (enumerate "\\begin{enumerate}\n\\item " r> n> "\\end{enumerate}")
   (itemize "\\begin{itemize}\n\\item " r> n> "\\end{itemize}")
 
@@ -134,18 +134,36 @@ post-expansion operations can be specified per template 
by the optional keys
 
   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> ")")
+  (iflet* "(if-let* (" p ")" n> r> ")")
+  (whenlet* "(when-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> ")")
-  (star "(let* (" p ")" n> r> ")")
+  (let* "(let* (" p ")" n> r> ")")
   (rec "(letrec (" p ")" n> r> ")")
-  (command "(defun " p " (" p ")\n  \"" p "\"" n> "(interactive)" 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) ")")
+  (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