Merge pull request #8 from scottoasis/master

Fix missing whitespaces in exported paragraphs.
This commit is contained in:
Lars Tveito 2016-03-24 11:20:08 +01:00
commit 4889adc219

View File

@ -74,7 +74,7 @@
CONTENTS is the paragraph contents. INFO is a plist used as a CONTENTS is the paragraph contents. INFO is a plist used as a
communication channel." communication channel."
(let ((contents (let ((contents
(concat (replace-regexp-in-string "\\\n" "" contents nil t) (concat (mapconcat 'identity (split-string contents) " ")
"\n"))) "\n")))
(let ((first-object (car (org-element-contents paragraph)))) (let ((first-object (car (org-element-contents paragraph))))
;; If paragraph starts with a #, protect it. ;; If paragraph starts with a #, protect it.