Disable toc and section-numbers, preempt `vars'

Replaces `var' with ~var~.
This commit is contained in:
Tom Willemse 2013-12-28 20:12:33 +01:00
parent f3315a4ddb
commit 3d09e85266

View file

@ -129,7 +129,11 @@ etc."
(defun edocs--format-text (txt) (defun edocs--format-text (txt)
"Perform formatting operations on TXT." "Perform formatting operations on TXT."
(org-export-string-as txt 'html t)) (let ((org-export-with-toc nil)
(org-export-with-section-numbers nil))
(org-export-string-as
(replace-regexp-in-string "`\\([^']+\\)'" "~\\1~" txt)
'html t)))
(defun edocs--format-commentary (cmt) (defun edocs--format-commentary (cmt)
"Perform special commentary formatting operations on CMT." "Perform special commentary formatting operations on CMT."