 |
aspect change - cl-yag - Common Lisp Yet Another website Generator |
 |
git clone git://bitreich.org/cl-yag/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws… |
 |
Log |
|
Files |
|
Refs |
|
Tags |
|
README |
|
LICENSE |
|
--- |
|
commit 304d6befcc4319581253099320092cb6cbee5bd1 |
|
parent 0daf877b6b4cf608db813b28f4563ac4481a7c8e |
|
Author: solene rapenne <[email protected]> |
|
Date: Tue, 3 May 2016 09:39:36 +0200 |
|
|
|
aspect change |
|
|
|
Diffstat: |
|
M generator.lisp | 6 ++---- |
|
|
|
1 file changed, 2 insertions(+), 4 deletions(-) |
|
--- |
|
diff --git a/generator.lisp b/generator.lisp |
|
@@ -101,8 +101,7 @@ |
|
(defun generate-site() |
|
|
|
;; produce index.html |
|
- (generate "index.html" |
|
- (generate-semi-mainpage)) |
|
+ (generate "index.html" (generate-semi-mainpage)) |
|
|
|
;; produce each article file |
|
(dolist (article *articles*) |
|
@@ -110,8 +109,7 @@ |
|
(create-article article :tiny nil))) |
|
|
|
;;(generate-file-rss) |
|
- (save-file "rss.xml" |
|
- (generate-rss)) |
|
+ (save-file "rss.xml" (generate-rss)) |
|
) |
|
|
|
(generate-site) |
