ox-html: Fix verse blocks

* lisp/ox-html.el (org-html-verse-block): Add missing line break at
  the end of each line in verse environments.

Reported-by: Skip Collins <skip.collins@gmail.com>
<http://permalink.gmane.org/gmane.emacs.orgmode/112537>
This commit is contained in:
Nicolas Goaziou 2017-03-08 00:12:55 +01:00
parent 4108f52f36
commit 64a5f9a596
1 changed files with 2 additions and 2 deletions

View File

@ -3600,8 +3600,8 @@ contextual information."
;; remove any trailing "br" close-tag so as to avoid
;; duplicates.
(let* ((br (org-html-close-tag "br" nil info))
(re (format "\\(%s\\)[ \t]*$" (regexp-quote br))))
(replace-regexp-in-string re br contents)))))
(re (format "\\(?:%s\\)?[ \t]*\n" (regexp-quote br))))
(replace-regexp-in-string re (concat br "\n") contents)))))
;;; Filter Functions