diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-09-20 13:03:20 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-09-20 13:03:20 +0200 |
| commit | 163ff19cf3cd32bc3c50da56a587976121e3f1d2 (patch) | |
| tree | 3404a1acf00a2793a7f5163afb5a538884fe0f24 /lisp/net/shr.el | |
| parent | 8da6eb3a7006542ec7ee8e6c0e9bcf94b64c1676 (diff) | |
| download | emacs-163ff19cf3cd32bc3c50da56a587976121e3f1d2.tar.gz emacs-163ff19cf3cd32bc3c50da56a587976121e3f1d2.tar.bz2 emacs-163ff19cf3cd32bc3c50da56a587976121e3f1d2.zip | |
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.
Diffstat (limited to 'lisp/net/shr.el')
| -rw-r--r-- | lisp/net/shr.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el index 1f53bc4016d..dcb64155d4b 100644 --- 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) |