From: Stefan Kangas Date: Thu, 18 Aug 2022 15:29:53 +0000 (+0200) Subject: ; * lisp/image-mode.el: Delete commented out image-transform-mode. X-Git-Tag: emacs-29.0.90~1447^2~68 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0b43ed4dbca0b6472ab2ec91c22dd809dfd42801;p=emacs.git ; * 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. --- 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." (image-toggle-display)))) -;; Not yet implemented. -;; (defvar image-transform-minor-mode-map -;; (let ((map (make-sparse-keymap))) -;; ;; (define-key map [(control ?+)] 'image-scale-in) -;; ;; (define-key map [(control ?-)] 'image-scale-out) -;; ;; (define-key map [(control ?=)] 'image-scale-none) -;; ;; (define-key map "c f h" 'image-scale-fit-height) -;; ;; (define-key map "c ]" 'image-rotate-right) -;; map) -;; "Minor mode keymap `image-transform-mode'.") -;; -;; (define-minor-mode image-transform-mode -;; "Minor mode for scaling and rotating images. -;; With a prefix argument ARG, enable the mode if ARG is positive, -;; and disable it otherwise. If called from Lisp, enable the mode -;; if ARG is omitted or nil. This minor mode requires Emacs to have -;; been compiled with ImageMagick support." -;; nil "image-transform" image-transform-minor-mode-map) - - (defsubst image-transform-width (width height) "Return the bounding box width of a rotated WIDTH x HEIGHT rectangle. The rotation angle is the value of `image-transform-rotation' in degrees."