[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master b08b2e0 2/2: Rename to image--transform-smoothing in image-mode.e
From: |
Lars Ingebrigtsen |
Subject: |
master b08b2e0 2/2: Rename to image--transform-smoothing in image-mode.el |
Date: |
Thu, 11 Mar 2021 20:38:03 -0500 (EST) |
branch: master
commit b08b2e03b255c0ad85bd026a8d786b21ee22eee8
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Rename to image--transform-smoothing in image-mode.el
* lisp/image-mode.el (image--transform-smoothing): Rename from
image-transform-smoothing.
(image-transform-properties, image-transform-reset): Adjust usage.
---
lisp/image-mode.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index e9a962f..2de16cb 100644
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -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)