#! /home/arun/.guix-profile/bin/emacs --script (require 'ox-publish) (setq org-publish-project-alist '(("pages" :base-directory "pages" :base-extension "org" :publishing-directory "site" :publishing-function org-html-publish-to-html :html-head "" :html-postamble nil :html-indent t) ("static" :base-directory "static" :base-extension any :publishing-directory "site/static" :publishing-function org-publish-attachment)) org-export-with-section-numbers nil org-export-with-toc nil org-html-head-include-default-style nil org-html-head-include-scripts nil org-export-filter-link-functions (list (lambda (output backend info) (string-match "" output) (let ((href (match-string 1 output))) (if (string-prefix-p "http" href) output (replace-match (file-name-base href) nil nil output 1))))) make-backup-files nil) (org-publish-all)