diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-03-08 00:12:55 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-03-08 00:12:55 +0100 |
commit | 64a5f9a59602f234febeb9ec2391e71e26d17fb4 (patch) | |
tree | de93453f911c23440701a0ddb2ca535424d50a77 | |
parent | 4108f52f36fd645b9e61bc43b09074e3f24bcf3e (diff) | |
download | org-mode-64a5f9a59602f234febeb9ec2391e71e26d17fb4.tar.gz |
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>
-rw-r--r-- | lisp/ox-html.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ox-html.el b/lisp/ox-html.el index 0db5a66..6ff487b 100644 --- a/lisp/ox-html.el +++ b/lisp/ox-html.el @@ -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 |