mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-22 14:01:47 -07:00
Code Issues Projects Releases Wiki Activity

Rename to image--transform-smoothing in image-mode.el

Browse source 
* lisp/image-mode.el (image--transform-smoothing): Rename from
image-transform-smoothing.
(image-transform-properties, image-transform-reset): Adjust usage.
This commit is contained in:
Lars Ingebrigtsen 2021-03-12 02:37:53 +01:00
parent 5dff53f5da
commit b08b2e03b2
1 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/image-mode.el
View file

@ -95,7 +95,7 @@ Its value should be one of the following:
(defvar-local image-transform-rotation 0.0
"Rotation angle for the image in the current Image mode buffer.")
(defvar-local image-transform-smoothing nil
(defvar-local image--transform-smoothing nil
"Whether to use transform smoothing.")
(defvar image-transform-right-angle-fudge 0.0001
@ -1481,9 +1481,9 @@ return value is suitable for appending to an image spec."
(list :height (cdr resized)))
,@(unless (= 0.0 image-transform-rotation)
(list :rotation image-transform-rotation))
,@(when image-transform-smoothing
,@(when image--transform-smoothing
(list :transform-smoothing
(string= image-transform-smoothing "smooth")))))))
(string= image--transform-smoothing "smooth")))))))
(defun image-transform-set-scale (scale)
"Prompt for a number, and resize the current image by that amount."
@ -1519,7 +1519,7 @@ ROTATION should be in degrees."
(defun image-transform-set-smoothing (smoothing)
(interactive (list (completing-read "Smoothing: "
'("none" "smooth") nil t)))
(setq image-transform-smoothing smoothing)
(setq image--transform-smoothing smoothing)
(image-toggle-display-image))
(defun image-transform-original ()
@ -1535,7 +1535,7 @@ ROTATION should be in degrees."
(setq image-transform-resize image-auto-resize
image-transform-rotation 0.0
image-transform-scale 1
image-transform-smoothing nil)
image--transform-smoothing nil)
(image-toggle-display-image))
(provide 'image-mode)