diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/org-publish-project-alist.el | 33 |
1 files changed, 18 insertions, 15 deletions
diff --git a/lisp/org-publish-project-alist.el b/lisp/org-publish-project-alist.el index c65f8f0..0461aed 100644 --- a/lisp/org-publish-project-alist.el +++ b/lisp/org-publish-project-alist.el @@ -18,22 +18,25 @@ org-html-publish-to-html, otherwise use org-pubish-attachment." (let ((root "~/Documents/orgsite/") (generated "generated/")) (setq org-publish-project-alist (nconc - `(("fi" - :base-directory ,(concat root "fi") - :publishing-directory ,(concat root generated "fi") - :base-extension any - :exclude ".*~" - :recursive t - :publishing-function org-html-publish-or-copy - :html-head-extra "<link rel=\"stylesheet\"type=\"text/css\" href=\"../../static/global.css\">" - :html-postamble nil - :html-preamble "<header> -<a id=\"skiptocontent\" href=\"#content\">Siirry pääsisältöön</a> + (seq-map (lambda (lang) + `(,(car lang) + :base-directory ,(concat root (car lang)) + :publishing-directory ,(concat root generated (car lang)) + :base-extension any + :exclude ".*~" + :recursive t + :publishing-function org-html-publish-or-copy + :html-head-extra "<link rel=\"stylesheet\"type=\"text/css\" href=\"../../static/global.css\">" + :html-postamble nil + :html-preamble ,(concat "<header> +<a id=\"skiptocontent\" href=\"#content\">" (cdr lang) "</a> <a href=\"/fi/\">FI</a> · <a href=\"/en/\">EN</a> -</header>" - :with-toc nil - :section-numbers nil - :language "fi")) +</header>") + :with-toc nil + :section-numbers nil + :author "Joel Kronqvist" + :language ,lang)) + '(("fi" . "Siirry pääsisältöön") ("en" . "Skip to content"))) (seq-map (lambda (ident) `(,ident :base-directory ,(concat root ident) |