mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-25 10:47:00 +00:00
Fix issue of inserting images on some systems
* lisp/net/shr.el (shr-tag-img): Construct a non-empty range
to pass to shr-image-fetched, to indicate where to insert the
image. Fixes the issue introduced with commit
80852f843e
(bug#22789).
This commit is contained in:
parent
0c5c04d58e
commit
887f6126c5
@ -1499,7 +1499,7 @@ The preference is a float determined from `shr-prefer-media-type'."
|
||||
(insert " ")
|
||||
(url-queue-retrieve
|
||||
(shr-encode-url url) 'shr-image-fetched
|
||||
(list (current-buffer) start (set-marker (make-marker) (1- (point)))
|
||||
(list (current-buffer) start (set-marker (make-marker) (point))
|
||||
(list :width width :height height))
|
||||
t t)))
|
||||
(when (zerop shr-table-depth) ;; We are not in a table.
|
||||
|
Loading…
Reference in New Issue
Block a user