ryuslash/orgweb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Separate export of articles

Browse source 
To keep Creation dates somewhat more close to their actual creation
date.
This commit is contained in:
Tom Willemse 2013-11-25 01:29:47 +01:00
parent c7712fff53
commit 879aef7f89
5 changed files with 46 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Makefile
View file

@ -1,12 +1,14 @@
all:
clean:
rm -rf _publish
rm -f _publish/*.*
rm -rf _publish/projects
export: clean
emacs -L ~/.emacs.d/vendor-lisp/org/lisp \
emacs -L $(CURDIR) -L ~/.emacs.d/vendor-lisp/org/lisp \
-L ~/.emacs.d/vendor-lisp/org/contrib/lisp -batch -l project.el \
-f org-publish-all
$(MAKE) -C articles export
publish: export
rsync -avuz --exclude=*~ _publish/ ryuslash.org:public_html/orgweb

6
articles/Makefile Normal file
View file

@ -0,0 +1,6 @@
all:
export:
emacs -L $(CURDIR) -L ~/.emacs.d/vendor-lisp/org/lisp \
-L ~/.emacs.d/vendor-lisp/org/contrib/lisp -batch -l project.el \
-f org-publish-all

18
articles/project.el Normal file
View file

@ -0,0 +1,18 @@
(require 'org-publish)
(load "../common.el")
(setq org-publish-use-timestamps-flag t
org-publish-project-alist
'(("blog"
:base-directory "./"
:publishing-directory "../_publish/articles/"
:recursive nil
:base-extension "org"
:publishing-function org-html-publish-to-html
:section-numbers nil
:table-of-contents nil
:html-doctype "<!DOCTYPE html>"
:html-head "<link href=\"https://ryuslash.org/org.css\" type=\"text/css\" rel=\"stylesheet\" />"
:html-link-up "../blog.html"
:html-link-home "/")))

4
common.el Normal file
View file

@ -0,0 +1,4 @@
(setq org-html-head-include-scripts nil
org-html-validation-link nil
org-html-htmlize-output-type 'css
org-confirm-babel-evaluate nil)

19
project.el
View file

@ -2,6 +2,8 @@
(require 'ox-rss)
;; (require 'ox-html)
(load "common.el")
;; (defun org-html-template (contents info)
;; "Return complete document string after HTML conversion.
;; CONTENTS is the transcoded contents string. INFO is a plist
@ -130,12 +132,8 @@
;; toc-entries "")
;; (org-html--make-string (- prev-level start-level) "</li>\n</ul>\n"))))
(setq org-html-head-include-scripts nil
org-html-validation-link nil
org-publish-use-timestamps-flag nil
org-html-htmlize-output-type 'css
(setq org-publish-use-timestamps-flag nil
org-rss-extension "rss"
org-confirm-babel-evaluate nil
org-publish-project-alist
'(("oni-files"
:base-directory "./"
@ -146,6 +144,17 @@
("org"
:base-directory "./"
:publishing-directory "_publish/"
:recursive nil
:base-extension "org"
:publishing-function org-html-publish-to-html
:section-numbers nil
:table-of-contents 1
:html-doctype "<!DOCTYPE html>"
:html-head "<link href=\"https://ryuslash.org/org.css\" type=\"text/css\" rel=\"stylesheet\" />"
:html-link-home "https://ryuslash.org")
("projects"
:base-directory "./projects/"
:publishing-directory "_publish/projects/"
:recursive t
:base-extension "org"
:publishing-function org-html-publish-to-html