diff options
| author | Stefan Kangas | 2022-08-18 17:29:53 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2022-08-18 19:22:48 +0200 |
| commit | 0b43ed4dbca0b6472ab2ec91c22dd809dfd42801 (patch) | |
| tree | ea2f0be6676bc6d098c96bbf3bf1a73b8a8506eb /lisp/image-mode.el | |
| parent | f97668c38fe4b503d14200baa4fe9627c2cbcb1b (diff) | |
| download | emacs-0b43ed4dbca0b6472ab2ec91c22dd809dfd42801.tar.gz emacs-0b43ed4dbca0b6472ab2ec91c22dd809dfd42801.zip | |
; * lisp/image-mode.el: Delete commented out image-transform-mode.
This mode was added in 2010 but never implemented. It was
subsequently commented out in 2012.
Diffstat (limited to 'lisp/image-mode.el')
| -rw-r--r-- | lisp/image-mode.el | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/lisp/image-mode.el b/lisp/image-mode.el index 76c076818f8..a923db5b5f4 100644 --- a/lisp/image-mode.el +++ b/lisp/image-mode.el | |||
| @@ -1384,26 +1384,6 @@ If no such buffer exists, it will be opened." | |||
| 1384 | (image-toggle-display)))) | 1384 | (image-toggle-display)))) |
| 1385 | 1385 | ||
| 1386 | 1386 | ||
| 1387 | ;; Not yet implemented. | ||
| 1388 | ;; (defvar image-transform-minor-mode-map | ||
| 1389 | ;; (let ((map (make-sparse-keymap))) | ||
| 1390 | ;; ;; (define-key map [(control ?+)] 'image-scale-in) | ||
| 1391 | ;; ;; (define-key map [(control ?-)] 'image-scale-out) | ||
| 1392 | ;; ;; (define-key map [(control ?=)] 'image-scale-none) | ||
| 1393 | ;; ;; (define-key map "c f h" 'image-scale-fit-height) | ||
| 1394 | ;; ;; (define-key map "c ]" 'image-rotate-right) | ||
| 1395 | ;; map) | ||
| 1396 | ;; "Minor mode keymap `image-transform-mode'.") | ||
| 1397 | ;; | ||
| 1398 | ;; (define-minor-mode image-transform-mode | ||
| 1399 | ;; "Minor mode for scaling and rotating images. | ||
| 1400 | ;; With a prefix argument ARG, enable the mode if ARG is positive, | ||
| 1401 | ;; and disable it otherwise. If called from Lisp, enable the mode | ||
| 1402 | ;; if ARG is omitted or nil. This minor mode requires Emacs to have | ||
| 1403 | ;; been compiled with ImageMagick support." | ||
| 1404 | ;; nil "image-transform" image-transform-minor-mode-map) | ||
| 1405 | |||
| 1406 | |||
| 1407 | (defsubst image-transform-width (width height) | 1387 | (defsubst image-transform-width (width height) |
| 1408 | "Return the bounding box width of a rotated WIDTH x HEIGHT rectangle. | 1388 | "Return the bounding box width of a rotated WIDTH x HEIGHT rectangle. |
| 1409 | The rotation angle is the value of `image-transform-rotation' in degrees." | 1389 | The rotation angle is the value of `image-transform-rotation' in degrees." |