cosmicflow/create-site.el
2024-06-21 23:08:58 +05:30

81 lines
3.3 KiB
EmacsLisp

;; Set the package installation directory so that packages aren't stored in the
;; ~/.emacs.d/elpa path.
(require 'package)
(setq package-user-dir (expand-file-name "./.packages"))
(setq package-archives '(("melpa" . "https://melpa.org/packages/")
("elpa" . "https://elpa.gnu.org/packages/")))
;; Initialize the package system
(package-initialize)
(unless package-archive-contents
(package-refresh-contents))
;; Install dependencies
(package-install 'htmlize)
(package-install 'ox-gemini)
;; Load the publishing system
(require 'ox-publish)
(use-package ox-gemini)
(setq org-publish-use-timestamps-flag nil)
(setq org-html-validation-link nil
org-html-head-include-scripts nil
org-html-head-include-default-style nil
org-html-preamble nil
org-html-postamble nil
org-html-use-infojs nil
)
(setq org-publish-project-alist '(
("cosmicpirates-html"
:base-directory "./content"
:base-extension "org"
:publishing-directory "public/cosmicpirates.space-html"
:recursive t
:publishing-function org-html-publish-to-html
;;:with-author nil
;;:with-creator nil
;;:email nil
:with-timestamps nil
)
("cosmicpirates-html-static"
:base-directory "./content/static"
:base-extension "css\\|ttf\\|png\\|jpg\\|gif\\|pdf\\|mp3\\|mp4\\|xml\\|html"
:publishing-directory "./public/cosmicpirates.space-html/static"
:recursive t
:publishing-function org-publish-attachment
)
("cosmicpirates-gmi"
:base-directory "./content"
:base-extension "org"
:publishing-directory "./public/cosmicpirates.space-gmi"
:recursive t
:publishing-function org-gemini-publish-to-gemini
:with-author nil
:with-creator nil
:email nil
:with-timestamps nil
)
("cosmicpirates-gmi-static"
:base-directory "./content/static"
:base-extension "css\\|ttf\\|png\\|jpg\\|gif\\|pdf\\|mp3\\|xml\\|html"
:publishing-directory "./public/cosmicpirates.space-gmi/static"
:recursive t
:publishing-function org-publish-attachment
export txt file as txt file in org html website publish
)
)
)
;; publish the websites
(org-publish-all t)
(message "Build complete!")