mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-03 08:30:09 +00:00
Code Issues Releases Activity

; Fix warnings in --without-x build

Browse Source 
* lisp/image/image-crop.el (image-scaling-factor)
(image-property, image-size, imagep):
* test/src/image-tests.el (image-size, image-mask-p)
(image-metadata): Declare.
This commit is contained in:
Stefan Kangas 2022-09-23 15:14:17 +02:00
parent b306bc5e6d
commit 8557ecca53
2 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/image/image-crop.el
View File

@ -31,6 +31,11 @@
(require 'text-property-search)
(eval-when-compile (require 'subr-x))
(defvar image-scaling-factor)
(declare-function image-property "image.el" (image property))
(declare-function image-size "image.c" (spec &optional pixels frame))
(declare-function imagep "image.c" (spec))
(defgroup image-crop ()
"Image cropping."
:group 'image)

4
test/src/image-tests.el
View File

@ -23,6 +23,10 @@
(require 'ert)
(declare-function image-size "image.c" (spec &optional pixels frame))
(declare-function image-mask-p "image.c" (spec &optional frame))
(declare-function image-metadata "image.c" (spec &optional frame))
(defconst image-tests--images
`((gif . ,(expand-file-name "test/data/image/black.gif"
source-directory))