tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

More exporter fixes.

This commit is contained in:
Carsten Dominik 2009-06-10 00:38:06 +02:00
parent cdc108eb4d
commit ae16e6ceca
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/org-docbook.el
View File

@ -1153,9 +1153,9 @@ publishing directory."
(defvar local-list-indent)
(defvar local-list-type)
(defun org-export-docbook-close-lists-maybe (line)
(let ((ind (or (get-text-property 0 'original-indentation line)
(and (string-match "\\S-" line)
(org-get-indentation line))))
(let ((ind (or (get-text-property 0 'original-indentation line)))
; (and (string-match "\\S-" line)
; (org-get-indentation line))))
didclose)
(when ind
(while (and in-local-list

6
lisp/org-html.el
View File

@ -1873,9 +1873,9 @@ If there are links in the string, don't modify these."
(defvar local-list-indent)
(defvar local-list-type)
(defun org-export-html-close-lists-maybe (line)
(let ((ind (or (get-text-property 0 'original-indentation line)
(and (string-match "\\S-" line)
(org-get-indentation line))))
(let ((ind (or (get-text-property 0 'original-indentation line)))
; (and (string-match "\\S-" line)
; (org-get-indentation line))))
didclose)
(when ind
(while (and in-local-list