Render empty <ul><li><ul> correctly

* lisp/net/shr.el (shr-tag-ul): Render empty <ul><li><ul>
correctly (bug#22964).
(cherry picked from commit 4f6ea3988b)

Backport:
This commit is contained in:
Lars Magne Ingebrigtsen 2016-03-20 13:52:36 +01:00
parent d8b2ce5f8a
commit 8a35f83c6c

View file

@ -1480,6 +1480,10 @@ The preference is a float determined from `shr-prefer-media-type'."
(shr-ensure-paragraph)
(let ((shr-list-mode 'ul))
(shr-generic dom))
;; If we end on an empty <li>, then make sure we really end on a new
;; paragraph.
(unless (bolp)
(insert "\n"))
(shr-ensure-paragraph))
(defun shr-tag-ol (dom)