mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 10:32:52 +00:00
LaTeX export: Fix bug with empty lines in VERSE environment
This commit is contained in:
parent
40940daad2
commit
201517106c
|
@ -1,5 +1,8 @@
|
||||||
2009-09-28 Carsten Dominik <carsten.dominik@gmail.com>
|
2009-09-28 Carsten Dominik <carsten.dominik@gmail.com>
|
||||||
|
|
||||||
|
* org-latex.el (org-export-latex-preprocess): Deal properly with
|
||||||
|
empty lines in verse environments.
|
||||||
|
|
||||||
* org.el (org-format-latex-header): Inline fullpage.sty.
|
* org.el (org-format-latex-header): Inline fullpage.sty.
|
||||||
|
|
||||||
* org-footnote.el (org-footnote-create-definition): Reveal context
|
* org-footnote.el (org-footnote-create-definition): Reveal context
|
||||||
|
|
|
@ -1661,9 +1661,11 @@ The conversion is made depending of STRING-BEFORE and STRING-AFTER."
|
||||||
(org-export-latex-protect-string
|
(org-export-latex-protect-string
|
||||||
(concat "\\hspace*{1cm}" (match-string 2))) t t)
|
(concat "\\hspace*{1cm}" (match-string 2))) t t)
|
||||||
(beginning-of-line 1))
|
(beginning-of-line 1))
|
||||||
|
(if (looking-at "[ \t]*$")
|
||||||
|
(insert "\\vspace*{1em}")
|
||||||
(unless (looking-at ".*?[^ \t\n].*?\\\\\\\\[ \t]*$")
|
(unless (looking-at ".*?[^ \t\n].*?\\\\\\\\[ \t]*$")
|
||||||
(end-of-line 1)
|
(end-of-line 1)
|
||||||
(insert "\\\\"))
|
(insert "\\\\")))
|
||||||
(beginning-of-line 2))
|
(beginning-of-line 2))
|
||||||
(and (looking-at "[ \t]*ORG-VERSE-END.*")
|
(and (looking-at "[ \t]*ORG-VERSE-END.*")
|
||||||
(org-replace-match-keep-properties "\\end{verse}" t t)))
|
(org-replace-match-keep-properties "\\end{verse}" t t)))
|
||||||
|
|
Loading…
Reference in a new issue