Mercurial > emacs
changeset 53335:fe80edbc3909
(x_set_mouse_color): Remove bogus x_check_errors call.
(Qimage): Remove extern (now in lisp.h).
(valid_image_p, parse_image_spec): Use IMAGEP macro.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Sun, 28 Dec 2003 00:13:10 +0000 |
| parents | 0432020d46a7 |
| children | 9a1b69cfa7be |
| files | src/xfns.c |
| diffstat | 1 files changed, 2 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xfns.c Sun Dec 28 00:12:45 2003 +0000 +++ b/src/xfns.c Sun Dec 28 00:13:10 2003 +0000 @@ -1300,7 +1300,6 @@ hourglass_cursor = XCreateFontCursor (dpy, XC_watch); x_check_errors (dpy, "bad hourglass pointer cursor: %s"); - x_check_errors (dpy, "bad nontext pointer cursor: %s"); if (!NILP (Vx_mode_pointer_shape)) { CHECK_NUMBER (Vx_mode_pointer_shape); @@ -4416,11 +4415,6 @@ 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; @@ -4500,7 +4494,7 @@ { int valid_p = 0; - if (CONSP (object) && EQ (XCAR (object), Qimage)) + if (IMAGEP (object)) { Lisp_Object tem; @@ -4602,7 +4596,7 @@ int i; Lisp_Object plist; - if (!CONSP (spec) || !EQ (XCAR (spec), Qimage)) + if (!IMAGEP (spec)) return 0; plist = XCDR (spec);