Apply all the actions before building the docs

This commit is contained in:
Sameer Rahmani 2022-07-03 23:04:31 +01:00
والد 95f7fea814
کامیت f3288bb30d
2فایلهای تغییر یافته به همراه5 افزوده شده و 5 حذف شده

مشاهده پرونده

@ -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")