diff --git a/lisp/org-html.el b/lisp/org-html.el index fcddd50..812e63c 100644 --- a/lisp/org-html.el +++ b/lisp/org-html.el @@ -929,6 +929,15 @@ lang=\"%s\" xml:lang=\"%s\"> ;; Protected HTML (when (get-text-property 0 'org-protected line) + (when in-local-list + (let ((ind (or (get-text-property 0 'original-indentation line) 0))) + (while (and (car local-list-indent) (< ind (car local-list-indent))) + (org-close-li (car local-list-type)) + (insert (format "%sl>\n" (car local-list-type))) + (setq local-list-indent (cdr local-list-indent)) + (setq local-list-type (cdr local-list-type)) + (setq in-local-list local-list-indent)))) + (let (par (ind (get-text-property 0 'original-indentation line))) (when (re-search-backward "\\(
\\)\\([ \t\r\n]*\\)\\=" (- (point) 100) t)