Minor fix

lisp/org-html.el

@@ -1873,8 +1873,7 @@ If there are links in the string, don't modify these."
 	didclose)
     (when ind
       (while (and in-local-list
-		  (or (= ind (car local-list-indent))
-		      (< ind (car local-list-indent))))
+		  (<= ind (car local-list-indent)))
 	(setq didclose t)
 	(org-close-li (car local-list-type))
 	(insert (format "</%sl>\n" (car local-list-type)))

lisp/org.el

@@ -6808,7 +6808,7 @@ the language, a switch telling of the content should be in a single line."
 	    ("^[ \t]*#\\+begin_docbook.*\n" "\n[ \t]*#\\+end_docbook" "xml")
 	    )))
 	(pos (point))
-	re1 re2 single beg end lang lfmt match-re1)
+	re1 re2 single beg end lang lfmt match-re1 ind)
     (catch 'exit
       (while (setq entry (pop re-list))
 	(setq re1 (car entry) re2 (nth 1 entry) lang (nth 2 entry)