Fix bug out when indenting inserted images in shr

* lisp/net/shr.el (shr-fill-line): We may not have a
shr-indentation text property here.  In that case, default to the
dynamically bound value.

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 1f53bc4016dca1206ba509a3a7b54c98d47253c6..dcb64155d4bf6da26f853b4308830c4c65955974 100644 (file)
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -714,7 +714,8 @@ size, and full-buffer size."
       (forward-char 1))))
 
 (defun shr-fill-line ()
-  (let ((shr-indentation (get-text-property (point) 'shr-indentation))
+  (let ((shr-indentation (or (get-text-property (point) 'shr-indentation)
+                             shr-indentation))
        (continuation (get-text-property
                       (point) 'shr-continuation-indentation))
        start)