Apply all the actions before building the docs
This commit is contained in:
γονέας
95f7fea814
υποβολή
f3288bb30d
2
build.el
2
build.el
|
@ -57,7 +57,7 @@ PARAMS:
|
|||
|
||||
(defproject FG42
|
||||
project-root (nth 2 command-line-args-left)
|
||||
fg42/build-docs-actions '(fg42/build-prepare-docs))
|
||||
docs-actions '(fg42/build-prepare-docs))
|
||||
|
||||
|
||||
(defun print-help (command)
|
||||
|
|
|
@ -276,10 +276,10 @@ Not pages."
|
|||
(stage1-dir (expand-file-name "site" build-dir))
|
||||
(final-dir (expand-file-name "site-build" build-dir)))
|
||||
|
||||
(mapc (lambda (f) (apply f build-dir base-url)) fg42/build-docs-actions)
|
||||
|
||||
;; Create org files for the cubes
|
||||
(fg42/build-prepare-docs build-dir base-url)
|
||||
;; Apply all the actions
|
||||
(mapcar (lambda (f)
|
||||
(funcall f build-dir base-url))
|
||||
fg42/build-docs-actions)
|
||||
|
||||
;; Copy the assets
|
||||
(copy-directory (from-root "/docs/site/assets")
|
||||
|
|
Φόρτωση…
Αναφορά σε νέο ζήτημα