 |
fixing a crash when no tag for an article and better Makefile - cl-yag - Common… |
 |
git clone git://bitreich.org/cl-yag/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws… |
 |
Log |
|
Files |
|
Refs |
|
Tags |
|
README |
|
LICENSE |
|
--- |
|
commit f5378fcab81e5f0c54f208270c617b1825162ab9 |
|
parent b0cd4f627992889230b31f3b414d0cbd16099610 |
|
Author: solene rapenne <[email protected]> |
|
Date: Sat, 14 May 2016 23:33:04 +0200 |
|
|
|
fixing a crash when no tag for an article and better Makefile |
|
|
|
Diffstat: |
|
M Makefile | 13 ++++++++++++- |
|
M generator.lisp | 2 +- |
|
|
|
2 files changed, 13 insertions(+), 2 deletions(-) |
|
--- |
|
diff --git a/Makefile b/Makefile |
|
@@ -1,7 +1,18 @@ |
|
+LISP=clisp |
|
+PARAM= |
|
+ |
|
+.if "${LISP}" == "sbcl" |
|
+PARAM=--dynamic-space-size 60 --script |
|
+.elif "${LISP}" == "clisp" |
|
+PARAM= |
|
+.elif "${LISP}" == "ecl" |
|
+PARAM=-shell |
|
+.endif |
|
+ |
|
all: |
|
mkdir -p output/static |
|
cp -fr static/* output/static/ |
|
- sbcl --dynamic-space-size 60 --script generator.lisp |
|
+ LANG=POSIX.UTF-8 $(LISP) $(PARAM) generator.lisp |
|
|
|
clean: |
|
rm -fr output/* |
|
diff --git a/generator.lisp b/generator.lisp |
|
@@ -81,7 +81,7 @@ |
|
(strip-quotes |
|
(mapcar #'(lambda (item) |
|
(prepare "template/one-tag.tpl" (template "%%Name%%" item))) |
|
- (split-str (getf article :tag))))) |
|
+ (split-str (getf article :tag ""))))) |
|
|
|
;; generates the html of the whole list of tags |
|
(defun get-tag-list() |
