X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;ds=sidebyside;f=blog.el;h=ff2fca2f3d925b54bff8211f0b39a3605b991238;hb=38acbeb6acd4af5479940996bad1c85ba90c97f8;hp=2df12243dcc92be94343480f0b1f1b20537d7422;hpb=a1e8b148970121c8f944f5abb2b85cca59090366;p=blog.git
diff --git a/blog.el b/blog.el
index 2df1224..ff2fca2 100644
--- a/blog.el
+++ b/blog.el
@@ -68,38 +68,97 @@
;; To prevent inline-css when exporting html. will use external css
(setq org-html-htmlize-output-type 'css)
+
+(setq blog-extra-head
+ (concat
+ "\n"
+ ;; "\n"
+ ;; ""
+ ))
+
+;; (setq blog-header
+;; (concat
+;; " "
+;; ""
+;; "
"
+;; ""
+;; ""))
+
+;; don't know why setting this null in `org-publish-project-alist' doesn't work
+;; (setf org-html-home/up-format "")
+
(setq org-publish-project-alist
`(
- ("org-notes"
- :base-directory ,root-dir
- :base-extension "org"
- :publishing-directory ,publish-dir
- :recursive t
- :publishing-function org-html-publish-to-html
- :headline-levels 4
- :section-numbers nil
- :auto-preamble t
- :auto-sitemap t ;Generate sitmap.org automagicaly...
- :sitemap-filename "sitemap.org" ;... call it sitemap.org (it's the default )...
- :sitemap-title "Sitemap"
-
- :html-table-of-contents nil
- :html-postamble nil ;dont export creator auto validation info in html postamble div
- :html-link-home "/"
- :html-head ,(concat "")
- :html-head-include-default-style nil
- :html-head-include-scripts nil)
- ("org-static"
- :base-directory ,root-dir
- :base-extension "css\\|js\\|png\\|gif\\|pdf\\|mp3\\|ogg\\|swf\\|el\\|pl"
- :publishing-directory ,publish-dir
- :recursive t
- :publishing-function org-publish-attachment
- :table-of-contents nil)
- ("org" :components ("org-notes" "org-static"))))
-
-
-(org-publish-project "org" force-publish)
+ ;; ("org-notes"
+ ;; :base-directory ,root-dir
+ ;; :base-extension "org"
+ ;; :publishing-directory ,publish-dir
+ ;; :recursive t
+ ;; :publishing-function org-html-publish-to-html
+ ;; :headline-levels 4
+ ;; :section-numbers nil
+ ;; :auto-preamble t
+ ;; :auto-sitemap t ;Generate sitmap.org automagicaly...
+ ;; :sitemap-filename "sitemap.org" ;... call it sitemap.org (it's the default )...
+ ;; :sitemap-title "Sitemap"
+
+ ;; :html-table-of-contents nil
+ ;; :html-postamble nil ;dont export creator auto validation info in html postamble div
+ ;; :html-link-home "/"
+ ;; :html-head ,(concat "")
+ ;; :html-head-include-default-style nil
+ ;; :html-head-include-scripts nil)
+ ("blog-pages"
+ ;; publishing
+ :base-directory ,root-dir
+ :base-extension "org"
+ :publishing-directory ,publish-dir
+ :recursive nil
+ :publishing-function org-html-publish-to-html
+
+ ;; html style
+ :htlm-link-home "/"
+ :html-head ,blog-extra-head
+ :html-postamble nil)
+ ("blog-posts"
+ ;; publishing
+ :base-directory ,(concat root-dir "/posts")
+ :base-extension "org"
+ :publishing-directory ,(concat publish-dir "/posts")
+ :recursive t
+ :publishing-function org-html-publish-to-html
+
+ ;; html style
+ :html-link-home "/"
+ ;; disable Home/Up
+ :html-home/up-format ""
+ :html-link-up ""
+ :html-link-home ""
+ ;; don't export creator auto validation info in html postamble div
+ :html-head ,blog-extra-head
+ :html-preamble nil
+ :html-postamble "")
+ ("blog-css"
+ :base-directory ,(concat root-dir "/css")
+ :base-extension ".*"
+ :publishing-directory ,(concat publish-dir "/css")
+ :publishing-function org-publish-attachment
+ :recursive t)
+ ("blog-cgi"
+ :base-directory ,(concat root-dir "/cgi-bin")
+ :base-extension ".*"
+ :publishing-directory ,(concat publish-dir "/cgi-bin")
+ :publishing-function org-publish-attachment
+ :recursive t)
+ ("blog" :components ("blog-pages" "blog-posts" "blog-css" "blog-cgi"))))
+
+(org-publish-project "blog" force-publish)
;; (provide 'blog)
(kill-emacs 0)