Schrijf over von Hayek's Nobel prijs speech.

[www2.vanrenterghem.biz.git] / maak-website.el

diff --git a/maak-website.el b/maak-website.el
index 10f2e6a69caf4675ea9b9e17ce2378de2be645ee..92a918d3c29584c9a5a43ea08720f7faa82812a5 100644 (file)
--- a/maak-website.el
+++ b/maak-website.el
@@ -1,6 +1,12 @@
 (require 'cl-lib)
 (require 'org)
 (require 'ox-publish)
+(add-to-list 'load-path "~/.emacs.d/elpa/ox-rss-20230408.231")
+(add-to-list 'load-path "~/.emacs.d/elpa/mustache-20230713.514")
+(add-to-list 'load-path "~/.emacs.d/elpa/s-20220902.1511")
+(add-to-list 'load-path "~/.emacs.d/elpa/dash-20240103.1301")
+(add-to-list 'load-path "~/.emacs.d/elpa/f-20231219.750")
+(add-to-list 'load-path "~/.emacs.d/elpa/htmlize-20240212.1001")
 (require 'ox-rss)
 (load "~/.emacs.d/lisp/mustache-html.el")
 
@@ -9,7 +15,7 @@
 (setq org-html-htmlize-output-type 'css) ; default: 'inline-css
 (setq org-time-stamp-custom-formats '("%A %e %B %Y" . "%A %e %B %Y at %H:%M"))
 (setq org-display-custom-times t)
-(setq org-html-container-element "section") ;; TODO - check
+(setq org-html-container-element "div") ;; TODO - check
 (setq my-blog-base-folder "~/websites/stage.vanrenterghem.biz")
 (setq my-blog-source-folder "~/websites/stage.vanrenterghem.biz/source")
 (setq my-blog-target-folder "~/websites/stage.vanrenterghem.biz/target")
@@ -161,10 +167,10 @@ Either the section between #+BEGIN_PREVIEW and +#END_PREVIEW is used, or the fir
          (insert "#+END_export\n")
          (insert preview)
                                        ;(insert (concat "#+INCLUDE: \"" relpath "\" :only-contents t :lines \"1-10\"\n"))
-          (insert "\n")
+         (insert "\n")
           (insert (concat "[[file:" relpath "][Read More...]]\n"))
          (insert "#+BEGIN_export html\n")
-         (insert "<\/section>\n")
+         (insert "</section> <!-- END CARD-BODY-->\n")
          (insert "#+END_export\n")
          ))
       ;; kill the first hrule to make this look OK