aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2021-03-12 02:37:53 +0100
committerLars Ingebrigtsen2021-03-12 02:37:53 +0100
commitb08b2e03b255c0ad85bd026a8d786b21ee22eee8 (patch)
tree6f25a3ee62bd3862d51f11fbfce73482818a3ee7
parent5dff53f5da4f17d74a0ad2cd7ec0a736aa5111f7 (diff)
downloademacs-b08b2e03b255c0ad85bd026a8d786b21ee22eee8.tar.gz
emacs-b08b2e03b255c0ad85bd026a8d786b21ee22eee8.zip
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.
-rw-r--r--lisp/image-mode.el10
1 files changed, 5 insertions, 5 deletions
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:
95(defvar-local image-transform-rotation 0.0 95(defvar-local image-transform-rotation 0.0
96 "Rotation angle for the image in the current Image mode buffer.") 96 "Rotation angle for the image in the current Image mode buffer.")
97 97
98(defvar-local image-transform-smoothing nil 98(defvar-local image--transform-smoothing nil
99 "Whether to use transform smoothing.") 99 "Whether to use transform smoothing.")
100 100
101(defvar image-transform-right-angle-fudge 0.0001 101(defvar image-transform-right-angle-fudge 0.0001
@@ -1481,9 +1481,9 @@ return value is suitable for appending to an image spec."
1481 (list :height (cdr resized))) 1481 (list :height (cdr resized)))
1482 ,@(unless (= 0.0 image-transform-rotation) 1482 ,@(unless (= 0.0 image-transform-rotation)
1483 (list :rotation image-transform-rotation)) 1483 (list :rotation image-transform-rotation))
1484 ,@(when image-transform-smoothing 1484 ,@(when image--transform-smoothing
1485 (list :transform-smoothing 1485 (list :transform-smoothing
1486 (string= image-transform-smoothing "smooth"))))))) 1486 (string= image--transform-smoothing "smooth")))))))
1487 1487
1488(defun image-transform-set-scale (scale) 1488(defun image-transform-set-scale (scale)
1489 "Prompt for a number, and resize the current image by that amount." 1489 "Prompt for a number, and resize the current image by that amount."
@@ -1519,7 +1519,7 @@ ROTATION should be in degrees."
1519(defun image-transform-set-smoothing (smoothing) 1519(defun image-transform-set-smoothing (smoothing)
1520 (interactive (list (completing-read "Smoothing: " 1520 (interactive (list (completing-read "Smoothing: "
1521 '("none" "smooth") nil t))) 1521 '("none" "smooth") nil t)))
1522 (setq image-transform-smoothing smoothing) 1522 (setq image--transform-smoothing smoothing)
1523 (image-toggle-display-image)) 1523 (image-toggle-display-image))
1524 1524
1525(defun image-transform-original () 1525(defun image-transform-original ()
@@ -1535,7 +1535,7 @@ ROTATION should be in degrees."
1535 (setq image-transform-resize image-auto-resize 1535 (setq image-transform-resize image-auto-resize
1536 image-transform-rotation 0.0 1536 image-transform-rotation 0.0
1537 image-transform-scale 1 1537 image-transform-scale 1
1538 image-transform-smoothing nil) 1538 image--transform-smoothing nil)
1539 (image-toggle-display-image)) 1539 (image-toggle-display-image))
1540 1540
1541(provide 'image-mode) 1541(provide 'image-mode)