diff options
| author | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-02-02 17:57:59 +0100 |
|---|---|---|
| committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-02-18 12:45:13 +0100 |
| commit | b43ad47ad1fa3ad39eea7acbf53d6e3f3dc2fdf2 (patch) | |
| tree | 5fc8dda082dd19c373223ca4af818102a384ec4b | |
| parent | 2de0a87f7d1005a68e7da7ea8f0b44e5cde9fa13 (diff) | |
| download | org-mode-b43ad47ad1fa3ad39eea7acbf53d6e3f3dc2fdf2.tar.gz | |
Insert a newline character before <\li> when exporting lists
* lisp/org-html.el (org-html-export-list-line): insert a newline
character before ending an item, as anchor could be on a line
going to be deleted, like a drawer ending string.
* lisp/org-list.el (org-list-to-html): same.
| -rw-r--r-- | lisp/org-html.el | 2 | ||||
| -rw-r--r-- | lisp/org-list.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-html.el b/lisp/org-html.el index 4a6bde9..59bfdc3 100644 --- a/lisp/org-html.el +++ b/lisp/org-html.el @@ -2427,7 +2427,7 @@ the alist of previous items." ;; Ending for every item (org-close-li type) ;; We're ending last item of the list: end list. - (when lastp (insert (format "</%sl>\n" type))))) + (when lastp (insert (format "\n</%sl>\n" type))))) (funcall get-closings pos)) (cond ;; At an item: insert appropriate tags in export buffer. diff --git a/lisp/org-list.el b/lisp/org-list.el index a719640..85f6afb 100644 --- a/lisp/org-list.el +++ b/lisp/org-list.el @@ -2942,7 +2942,7 @@ with overruling parameters for `org-list-to-generic'." :dstart "<dl>" :dend "</dl>" :dtstart "<dt>" :dtend "</dt>\n" :ddstart "<dd>" :ddend "</dd>" - :istart "<li>" :iend "</li>" + :istart "<li>" :iend "\n</li>" :icount (format "<li value=\"%s\">" counter) :isep "\n" :lsep "\n" :csep "\n" :cbon "<code>[X]</code>" :cboff "<code>[ ]</code>") |