summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2023-09-03 03:08:40 +0100
committerjao <jao@gnu.org>2023-09-03 03:08:40 +0100
commit357fd14c3f252ca99c19b026789e5d633efb6166 (patch)
tree3fa106241d1d92fab6079eb7210896c8412d94ff
parentce250dbb80622a17a44fa392d17c3b6b0c568ce7 (diff)
downloadelibs-357fd14c3f252ca99c19b026789e5d633efb6166.tar.gz
elibs-357fd14c3f252ca99c19b026789e5d633efb6166.tar.bz2
blog: deactivating whitespace decorations during publish
-rw-r--r--custom/jao-custom-blog.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/custom/jao-custom-blog.el b/custom/jao-custom-blog.el
index d7e03f1..a11c5c0 100644
--- a/custom/jao-custom-blog.el
+++ b/custom/jao-custom-blog.el
@@ -123,7 +123,8 @@
t
(buffer-file-name))))
(let ((geiser-active-implementations '(guile))
- (geiser-default-implementation 'guile))
+ (geiser-default-implementation 'guile)
+ (whitespace-style nil))
(org-static-blog-publish-file fname)))
(defconst jao-org-static-blog--prev-beg "#+html: <!-- preview-start -->")
@@ -188,7 +189,8 @@
(defun jao-org-blog-publish (&optional force)
(interactive "P")
(let ((geiser-active-implementations '(guile))
- (geiser-default-implementation 'guile))
+ (geiser-default-implementation 'guile)
+ (whitespace-style nil))
(org-static-blog-publish force)))
(defun jao-org-blog-republish ()