aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorEli Zaretskii2022-09-16 14:23:41 +0300
committerEli Zaretskii2022-09-16 14:23:41 +0300
commite485734151ca3741ecf03e27aae2384fc7ace461 (patch)
tree705f2288047538879ce487d6e9108c5c14c56da0 /lisp
parent9c0403aae0498d356c56bf972013faec61097064 (diff)
downloademacs-e485734151ca3741ecf03e27aae2384fc7ace461.tar.gz
emacs-e485734151ca3741ecf03e27aae2384fc7ace461.zip
; * lisp/image/image-crop.el (image-cut): Doc fix.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/image/image-crop.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/image/image-crop.el b/lisp/image/image-crop.el
index 682fce39866..8b6694f2231 100644
--- a/lisp/image/image-crop.el
+++ b/lisp/image/image-crop.el
@@ -105,9 +105,9 @@ image data.")
105 105
106;;;###autoload 106;;;###autoload
107(defun image-cut (&optional color) 107(defun image-cut (&optional color)
108 "Cut a rectangle from the image under point. 108 "Cut a rectangle from the image under point, filling it with COLOR.
109Interactively, if given a prefix, prompt for COLOR to use. 109COLOR defaults to the value of `image-cut-color'.
110Otherwise, default to `image-cut-color'." 110Interactively, with prefix argument, prompt for COLOR to use."
111 (interactive (list (and current-prefix-arg (read-color "Use color: ")))) 111 (interactive (list (and current-prefix-arg (read-color "Use color: "))))
112 (image-crop (if (zerop (length color)) image-cut-color color))) 112 (image-crop (if (zerop (length color)) image-cut-color color)))
113 113