From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 12 Mar 2021 01:37:53 +0000 (+0100)
Subject: Rename to image--transform-smoothing in image-mode.el
X-Git-Tag: emacs-28.0.90~3308
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b08b2e03b255c0ad85bd026a8d786b21ee22eee8;p=emacs.git

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.
---

diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index e9a962ffe96..2de16cb6afd 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)