summaryrefslogtreecommitdiff
path: root/src/w32fns.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/w32fns.c')
-rw-r--r--src/w32fns.c9
1 files changed, 2 insertions, 7 deletions
diff --git a/src/w32fns.c b/src/w32fns.c
index d8572265bef..7bffea34a28 100644
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -6937,11 +6937,6 @@ DEFUN ("x-synchronize", Fx_synchronize, Sx_synchronize, 1, 2, 0,
static struct image_type *image_types;
-/* The symbol `image' which is the car of the lists used to represent
- images in Lisp. */
-
-extern Lisp_Object Qimage;
-
/* The symbol `xbm' which is used as the type symbol for XBM images. */
Lisp_Object Qxbm;
@@ -7021,7 +7016,7 @@ valid_image_p (object)
{
int valid_p = 0;
- if (CONSP (object) && EQ (XCAR (object), Qimage))
+ if (IMAGEP (object))
{
Lisp_Object tem;
@@ -7123,7 +7118,7 @@ parse_image_spec (spec, keywords, nkeywords, type)
int i;
Lisp_Object plist;
- if (!CONSP (spec) || !EQ (XCAR (spec), Qimage))
+ if (!IMAGEP (spec))
return 0;
plist = XCDR (spec);