daniel/ox-rst
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Use info

Browse Source
This commit is contained in:
Igarashi Masanao
2018-02-22 21:55:29 +09:00
parent a42402f571
commit 9d2daebfab
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
ox-rst.el
View File

@@ -1040,11 +1040,11 @@ information."
;;;; Paragraph ;;;; Paragraph
(defun org-rst-paragraph (_paragraph contents _info) (defun org-rst-paragraph (_paragraph contents info)
"Transcode a PARAGRAPH element from Org to reStructuredText. "Transcode a PARAGRAPH element from Org to reStructuredText.
CONTENTS is the contents of the paragraph, as a string. INFO is CONTENTS is the contents of the paragraph, as a string. INFO is
the plist used as a communication channel." the plist used as a communication channel."
(when (plist-get _info :preserve-breaks) (when (plist-get info :preserve-breaks)
(let ((lines (split-string contents "\n+[ \t\n]*"))) (let ((lines (split-string contents "\n+[ \t\n]*")))
(cond ((> (length lines) 2) (cond ((> (length lines) 2)
(setq contents (apply 'concat (mapcar (setq contents (apply 'concat (mapcar