diff options
| author | Eli Zaretskii | 2022-09-16 14:23:41 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2022-09-16 14:23:41 +0300 |
| commit | e485734151ca3741ecf03e27aae2384fc7ace461 (patch) | |
| tree | 705f2288047538879ce487d6e9108c5c14c56da0 | |
| parent | 9c0403aae0498d356c56bf972013faec61097064 (diff) | |
| download | emacs-e485734151ca3741ecf03e27aae2384fc7ace461.tar.gz emacs-e485734151ca3741ecf03e27aae2384fc7ace461.zip | |
; * lisp/image/image-crop.el (image-cut): Doc fix.
| -rw-r--r-- | lisp/image/image-crop.el | 6 |
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. |
| 109 | Interactively, if given a prefix, prompt for COLOR to use. | 109 | COLOR defaults to the value of `image-cut-color'. |
| 110 | Otherwise, default to `image-cut-color'." | 110 | Interactively, 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 | ||