aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen2016-03-20 15:15:32 +0100
committerLars Magne Ingebrigtsen2016-03-20 15:15:32 +0100
commit78bcd428573f4eed83bf143d296fbd38a3ffd71e (patch)
tree18df42abacce473dc4cd4175380004d232766199 /lisp
parent61b2e837d8eefcba7ae8dbe442a818f05d5ed6f0 (diff)
downloademacs-78bcd428573f4eed83bf143d296fbd38a3ffd71e.tar.gz
emacs-78bcd428573f4eed83bf143d296fbd38a3ffd71e.zip
Further empty <li> tweaks
* lisp/net/shr.el (shr-tag-li): When showing several empty <li> elements, ensure that they really get inserted on a new line.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/net/shr.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 4adb4a6099c..60794158024 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1617,7 +1617,9 @@ The preference is a float determined from `shr-prefer-media-type'."
1617 (put-text-property start (1+ start) 1617 (put-text-property start (1+ start)
1618 'shr-continuation-indentation shr-indentation) 1618 'shr-continuation-indentation shr-indentation)
1619 (put-text-property start (1+ start) 'shr-prefix-length (length bullet)) 1619 (put-text-property start (1+ start) 'shr-prefix-length (length bullet))
1620 (shr-generic dom))))) 1620 (shr-generic dom))))
1621 (unless (bolp)
1622 (insert "\n")))
1621 1623
1622(defun shr-mark-fill (start) 1624(defun shr-mark-fill (start)
1623 ;; We may not have inserted any text to fill. 1625 ;; We may not have inserted any text to fill.