Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 09:14:18 +00:00
Code Issues Projects Releases Packages Wiki Activity

Inhibit image-crop when there's overlays

Browse source 
* lisp/image/image-crop.el (image-crop): Don't mess with overlays,
because they're a pain to reconstruct (bug#58027).
This commit is contained in:
Lars Ingebrigtsen 2022-09-23 17:34:46 +02:00
parent f13300e84a
commit 6fb4f4ad80
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/image/image-crop.el
View file

@ -143,6 +143,8 @@ After cropping an image, you can save it by `M-x image-save' or
(let ((image (get-text-property (point) 'display)))
(unless (imagep image)
(user-error "No image under point"))
(when (overlays-at (point))
(user-error "Can't edit images that have overlays"))
;; We replace the image under point with an SVG image that looks
;; just like that image. That allows us to draw lines over it.
;; At the end, we replace that SVG with a cropped version of the