Allow access to template vars.
diff --git a/template.lisp b/template.lisp
index 2e9c031..5e52ff9 100644
--- a/template.lisp
+++ b/template.lisp
@@ -24,6 +24,8 @@
#:*template-vars-package*
#:define-template-var
#:template-let
+ #:template-var
+ #:template-var-key
#:read-template
#:compile-template
#:compile-template-from-file
@@ -41,6 +43,9 @@
(defun template-var-key (var)
(intern (symbol-name var) *template-vars-package*))
+(defmacro template-var (name)
+ (template-var-key name))
+
(defun template-var-p (var)
(and (symbolp var)
(eq (symbol-package var)