diff options
| author | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2016-03-20 13:52:36 +0100 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2016-03-20 13:52:36 +0100 |
| commit | 4f6ea3988b66cf132c67fd0cc26d12eb9a300ba1 (patch) | |
| tree | b5d9b1c4a88b160eeba859b26346d838e4b3bde8 | |
| parent | 292921facaff2f02ac4e8602c1f7ecbdcfe7ef45 (diff) | |
| download | emacs-4f6ea3988b66cf132c67fd0cc26d12eb9a300ba1.tar.gz | |
Render empty <ul><li><ul> correctly
* lisp/net/shr.el (shr-tag-ul): Render empty <ul><li><ul>
correctly (bug#22964).
| -rw-r--r-- | lisp/net/shr.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el index eae50a71438..4f64618c008 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el @@ -1589,6 +1589,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) |