;;; Code:
-;; (defconst root-dir "~/Private/blog/")
-
(require 'org)
(require 'ox-publish)
(require 'htmlize)
(setq blog-extra-head
(concat
- ;; "<link rel='stylesheet' href='../css/worg.css' />\n"
- "<link rel='stylesheet' href='../css/my.css' />\n"
- "<link rel='stylesheet' href='../css/code.css' />"))
+ "<link rel='stylesheet' href='/css/my.css' />\n"
+ "<link rel='stylesheet' href='/css/code.css' />"))
(setq blog-header
(concat
"<header id= 'banner'>"
- "<h1><a href= '/' >Peng Li</a></h1>"
- "<hr>"
+ "<a class=\"title\"href= '/' >Peng Li</a>"
"<nav><ul>"
"<li><a href= '/about.html' >About</a></li>"
"<li><a href= '/posts/sitemap.html' >Blog</a></li>"
- "<li><a href= '/index.html' >Home</a></li>"
+ ;; "<li><a href= '/index.html' >Home</a></li>"
"</ul></nav>"
- "</header>"))
+ "</header>"
+ "<hr>"))
(setq blog-footer
(concat
"<hr />\n"
- "<p><span style=\"float: left;\"><a href= \"http://orgmode.org\"/>Org-mode </a>" (org-version) "</span>"))
+ org-html-creator-string))
(defun blog-setup-project-alist (root-dir &optional output-dir)
"Set project alist. `output-dir' is the directory of publish-directory.
;; sitemap
:auto-sitemap t
:sitemap-filename "sitemap.org"
- :sitemap-title "Sitemap"
+ :sitemap-title "Blog"
+ :sitemap-sort-files anti-chronologically
+ :sitemap-date-format "%h %d, %Y"
+ :sitemap-file-entry-format "%d ยป %t"
;; other generic options
:with-toc nil ; table of contents