diff options
author | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-02-08 20:54:58 +0100 |
---|---|---|
committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-02-18 13:43:48 +0100 |
commit | 3d34dd47dd5364a7c614f4301f4b086c719a9eb0 (patch) | |
tree | 2126e6b6b4ed52b40fff09972c6cfffefcff7cae | |
parent | 4fd61d8021b36f0316eca0693101bdadcfc4b94c (diff) | |
download | org-mode-3d34dd47dd5364a7c614f4301f4b086c719a9eb0.tar.gz |
org-html: remove unneeded newline characters in list export
-rw-r--r-- | lisp/org-html.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/org-html.el b/lisp/org-html.el index 9e43a8f..50fb33e 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 "\n</%sl>\n" type))))) + (when lastp (insert (format "</%sl>\n" type))))) (funcall get-closings pos)) (cond ;; At an item: insert appropriate tags in export buffer. @@ -2458,10 +2458,10 @@ the alist of previous items." (insert (format "<%sl>\n" type))) (insert (cond ((equal type "d") - (format "<dt>%s</dt><dd>\n" desc-tag)) + (format "<dt>%s</dt><dd>" desc-tag)) ((and (equal type "o") counter) - (format "<li value=\"%s\">\n" counter)) - (t "<li>\n"))) + (format "<li value=\"%s\">" counter)) + (t "<li>"))) ;; If line had a checkbox, some additional modification is required. (when checkbox (setq body |