Commit b251851da245

Vincent Demeester <vincent@sbr.pm>
2020-11-26 18:28:10
Remove lib/lisp deprecated lisp
Signed-off-by: Vincent Demeester <vincent@sbr.pm>
1 parent 9b5fc2a
Changed files (2)
lib/lisp/docs.el
@@ -1,27 +0,0 @@
-;;; docs.el --- Docs functions -*- lexical-binding: t; -*-
-;; Author: Vincent Demeester <vincent@sbr.pm>
-
-;;; Commentary:
-;; This contains a group of function to update docs/ org includes.
-(require 'init-func)
-(require 'ox-md)
-
-;;; Code:
-(defun update-docs ()
-  "Updates #+INCLUDE in docs/ org-mode files"
-  (mapc (lambda (x) (update-org-include x))
-        (directory-files-recursively "docs" "\.org$")))
-
-(defun update-readme-md ()
-  "Updates README.md based on README.org"
-  (with-current-buffer (find-file-noselect "README.org")
-    (org-md-export-to-markdown)))
-
-(defun update-org-include (file)
-  "Updates #+INCLUDE in docs/ org-mode of FILE."
-  (message file)
-  (with-current-buffer (find-file-noselect file)
-    (save-and-update-includes)))
-
-(provide 'docs)
-;;; docs.el ends here
lib/lisp/publish.el
@@ -1,52 +0,0 @@
-;;; publish.el --- Publish home project -*- lexical-binding: t; -*-
-;; Author: Vincent Demeester <vincent@sbr.pm>
-
-;;; Commentary:
-;; This script will convert the org-mode files in this directory into
-;; html.
-
-;;; Code:
-(require 'package)
-(require 'publish-common)
-
-;; OrgPublishProjects
-(setq org-publish-project-alist
-      `(("configurations"
-         :base-directory "docs"
-         :base-extension "org"
-         :recursive t
-         :publishing-function org-html-publish-to-html
-         :publishing-directory "../www/public/configurations"
-         :exclude ,(regexp-opt '("README.org" "draft"))
-         :auto-sitemap t
-         :sitemap-filename "sitemap.org"
-         :sitemap-title "Configurations"
-         ;;:sitemap-format-entry sbr/org-sitemap-format-entry
-         :sitemap-style tree
-         :sitemap-sort-files anti-chronologically
-         ;;:sitemap-function sbr/org-publish-sitemap
-         :with-footnotes t
-         :with-toc nil
-         :with-drawers t
-         :html-head-include-scripts nil
-         :html-head-include-default-style nil
-         :html-head ,sbr-website-html-head
-         :html-preamble sbr-website-html-preamble
-         :html-postamble ,sbr-website-html-postamble)
-        ("images"
-         :base-directory "docs/images"
-         :base-extension ,site-attachments
-         :publishing-directory "../www/public/configurations/images"
-         :publishing-function org-publish-attachment
-         :recursive t)
-        ("assets"
-         :base-directory "docs/assets"
-         :base-extension ,site-attachments
-         :publishing-directory "../www/public/configurations/assets"
-         :publishing-function org-publish-attachment
-         :recursive t)
-        ("all" :components ("configurations" "images" "assets"))))
-;; -OrgPublishProjects
-
-(provide 'publish)
-;;; publish.el ends here