diff options
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/create.scm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/scripts/create.scm b/scripts/create.scm new file mode 100644 index 0000000..6f7f549 --- /dev/null +++ b/scripts/create.scm @@ -0,0 +1,9 @@ +(define-module (scripts create) + #:use-module ((src atom) #:prefix atom:) + #:use-module ((src html) #:prefix html:) + #:use-module (src as)) + +(define root (canonicalize-path (cadr (command-line)))) + +(define atom-feed (atom:render (as 'atom root))) +(define html-index (html:render (as 'html root))) |