aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/image.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/image.el')
-rw-r--r--lisp/image.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/image.el b/lisp/image.el
index b5f22351377..b69bf930545 100644
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -29,6 +29,7 @@
29 "Image support." 29 "Image support."
30 :group 'multimedia) 30 :group 'multimedia)
31 31
32(declare-function image-flush "image.c" (spec &optional frame))
32(defalias 'image-refresh 'image-flush) 33(defalias 'image-refresh 'image-flush)
33 34
34(defconst image-type-header-regexps 35(defconst image-type-header-regexps
@@ -1001,6 +1002,8 @@ default is 20%."
1001 (setq new (nconc new (list key val)))))) 1002 (setq new (nconc new (list key val))))))
1002 new))) 1003 new)))
1003 1004
1005(declare-function image-size "image.c" (spec &optional pixels frame))
1006
1004(defun image--current-scaling (image new-image) 1007(defun image--current-scaling (image new-image)
1005 ;; The image may be scaled due to many reasons (:scale, :max-width, 1008 ;; The image may be scaled due to many reasons (:scale, :max-width,
1006 ;; etc), so find out what the current scaling is based on the 1009 ;; etc), so find out what the current scaling is based on the