diff options
Diffstat (limited to 'lisp')
| -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." |