docstrings

1 files changed, 10 insertions, 0 deletions

diff --git a/flexo.lisp b/flexo.lisp
index 166ffc6..c05d68d 100644
--- a/flexo.lisp
+++ b/flexo.lisp
@@ -298,6 +298,11 @@ artifact tables have changed."
     :text (ps:ps ,@parenscript-code)))
 
 (defmacro define-ps-script (name url-string &body parenscript-code)
+  "Defines a thunk named NAME that, when called, creates an instance
+   of PS-SCRIPT.  Intended to be used to define named scripts that can
+   be called within a site building recipe. Keeping the script
+   definition outside of the body of the recipe supports interactive
+   development."
   `(defun ,name ()
      (ps-script ,url-string
        ,@parenscript-code)))
@@ -310,6 +315,11 @@ artifact tables have changed."
     :text (lass:compile-and-write ,@lass-code)))
 
 (defmacro define-lass-sheet (name url &body lass-code)
+  "Defines a thunk named NAME that, when called, creates an instance
+   of LASS-SHEET.  Intended to be used to define named stylesheets
+   that can be called within a single site building recipe. Keepng the
+   sheet defintion outside the body of the recipe supports interactive
+   development."
   `(defun ,name ()
      (lass-sheet ,url ,@lass-code)))