summaryrefslogtreecommitdiff
path: root/lisp/net/shr.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-05-13 15:10:33 -0400
committerLars Ingebrigtsen <larsi@gnus.org>2019-05-13 15:10:33 -0400
commit3de3452014e8c8dade2cd62aa6c6a701692aa3f9 (patch)
treed0e4a17802327c6713fb933ea3b00bba00bbe457 /lisp/net/shr.el
parent648a52ae69a1786774e2e94c69f43f7c1d6f24e0 (diff)
downloademacs-3de3452014e8c8dade2cd62aa6c6a701692aa3f9.tar.gz
emacs-3de3452014e8c8dade2cd62aa6c6a701692aa3f9.tar.bz2
emacs-3de3452014e8c8dade2cd62aa6c6a701692aa3f9.zip
Add a comment about the previous shr change
Diffstat (limited to 'lisp/net/shr.el')
-rw-r--r--lisp/net/shr.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 4820d8b4365..3ab5116597b 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1791,6 +1791,8 @@ The preference is a float determined from `shr-prefer-media-type'."
(defun shr-mark-fill (start)
;; We may not have inserted any text to fill.
(when (and (/= start (point))
+ ;; Tables insert themselves with the correct indentation,
+ ;; so don't do anything if we're at the start of a table.
(not (get-text-property start 'shr-table-id)))
(put-text-property start (1+ start)
'shr-indentation shr-indentation)))