diff --git a/templates b/templates
index e1e10c9..32e0690 100644
--- a/templates
+++ b/templates
@@ -11,14 +11,15 @@ emacs-lisp-mode
 (pM "(point-max)")
 (up "(use-package " (p "package") ")")
 
-lisp-mode emacs-lisp-mode inferior-emacs-lisp-mode
+lisp-mode emacs-lisp-mode inferior-emacs-lisp-mode slime-repl-mode
 (la "(lambda (" p ")" n> r> ")")
+;; (l "(lambda (" (s "arguments") ") " (s "forms") ")")
 (dv "(defvar " (p "symbol" symbol) " " (p "value")
     n> "\"" (p "doc") "\"" ")")
 (dm "(defmethod " (p "name") " (" (p "arguments") ")" n> ")")
 (df "(defun " (p "name") " (" (s "arguments") ")" n> r> ")")
-(l  "(let (" p ")" n> r> ")")
-(ls "(let* (" p ")" n> r> ")")
+(l  "(let (" p ")" n> r> q ")")
+(ls "(let* (" p ")" n> r> q ")")
 (ws "(with-slots (" (p "slots") ") " (p "object") n> ")")
 
 slime-repl-mode lisp-mode
@@ -33,7 +34,7 @@ slime-repl-mode lisp-mode
     n> "(:use :cl)" q ")")
 (up "(use-package '(" (p "package") "))")
 (ip "(in-package :" (p "package") ")")
-(l "(lambda (" (s "arguments") ") " (s "forms") ")")
+(ln "(:local-nicknames (:" (p "nickname") " :" (p "package-name") ")" q ")")
 (c "#+(or)")
 ;; print debugging
 (pd "(format *debug-io* \"" (p "string") "\" " (p "args") ")")