--- shr.el~ 2016-03-21 22:00:40.983451400 +0000 +++ shr.el 2016-07-20 10:26:30.487350400 +0000 @@ -636,13 +636,12 @@ ;; Success; continue. (when (= (preceding-char) ?\s) (delete-char -1)) - (let ((face (get-text-property (point) 'face)) + (let ((props (text-properties-at (point))) (background-start (point))) (insert "\n") (shr-indent) - (when face - (put-text-property background-start (point) 'face - `,(shr-face-background face)))) + (when props + (add-text-properties background-start (point) props))) (setq start (point)) (shr-vertical-motion shr-internal-width) (when (looking-at " $")