diff --git a/lisp/image/image-crop.el b/lisp/image/image-crop.el index 8ec4679b9ba..61ed7e1db17 100644 --- a/lisp/image/image-crop.el +++ b/lisp/image/image-crop.el @@ -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