diff options
| author | Kim F. Storm | 2003-12-28 00:13:10 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2003-12-28 00:13:10 +0000 |
| commit | 15aa58c18e557ead24010b7c9f78bd94d5579cf8 (patch) | |
| tree | 779d9b61057c446c5364a3c697bedea46ab4a937 /src | |
| parent | d7078aefa029a7f6beea9fb0803305600ab7d0f5 (diff) | |
| download | emacs-15aa58c18e557ead24010b7c9f78bd94d5579cf8.tar.gz emacs-15aa58c18e557ead24010b7c9f78bd94d5579cf8.zip | |
(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.
Diffstat (limited to 'src')
| -rw-r--r-- | src/xfns.c | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/src/xfns.c b/src/xfns.c index cd50cbbc919..e940b16eba1 100644 --- a/src/xfns.c +++ b/src/xfns.c | |||
| @@ -1300,7 +1300,6 @@ x_set_mouse_color (f, arg, oldval) | |||
| 1300 | hourglass_cursor = XCreateFontCursor (dpy, XC_watch); | 1300 | hourglass_cursor = XCreateFontCursor (dpy, XC_watch); |
| 1301 | x_check_errors (dpy, "bad hourglass pointer cursor: %s"); | 1301 | x_check_errors (dpy, "bad hourglass pointer cursor: %s"); |
| 1302 | 1302 | ||
| 1303 | x_check_errors (dpy, "bad nontext pointer cursor: %s"); | ||
| 1304 | if (!NILP (Vx_mode_pointer_shape)) | 1303 | if (!NILP (Vx_mode_pointer_shape)) |
| 1305 | { | 1304 | { |
| 1306 | CHECK_NUMBER (Vx_mode_pointer_shape); | 1305 | CHECK_NUMBER (Vx_mode_pointer_shape); |
| @@ -4416,11 +4415,6 @@ the excessive values are ignored. */) | |||
| 4416 | 4415 | ||
| 4417 | static struct image_type *image_types; | 4416 | static struct image_type *image_types; |
| 4418 | 4417 | ||
| 4419 | /* The symbol `image' which is the car of the lists used to represent | ||
| 4420 | images in Lisp. */ | ||
| 4421 | |||
| 4422 | extern Lisp_Object Qimage; | ||
| 4423 | |||
| 4424 | /* The symbol `xbm' which is used as the type symbol for XBM images. */ | 4418 | /* The symbol `xbm' which is used as the type symbol for XBM images. */ |
| 4425 | 4419 | ||
| 4426 | Lisp_Object Qxbm; | 4420 | Lisp_Object Qxbm; |
| @@ -4500,7 +4494,7 @@ valid_image_p (object) | |||
| 4500 | { | 4494 | { |
| 4501 | int valid_p = 0; | 4495 | int valid_p = 0; |
| 4502 | 4496 | ||
| 4503 | if (CONSP (object) && EQ (XCAR (object), Qimage)) | 4497 | if (IMAGEP (object)) |
| 4504 | { | 4498 | { |
| 4505 | Lisp_Object tem; | 4499 | Lisp_Object tem; |
| 4506 | 4500 | ||
| @@ -4602,7 +4596,7 @@ parse_image_spec (spec, keywords, nkeywords, type) | |||
| 4602 | int i; | 4596 | int i; |
| 4603 | Lisp_Object plist; | 4597 | Lisp_Object plist; |
| 4604 | 4598 | ||
| 4605 | if (!CONSP (spec) || !EQ (XCAR (spec), Qimage)) | 4599 | if (!IMAGEP (spec)) |
| 4606 | return 0; | 4600 | return 0; |
| 4607 | 4601 | ||
| 4608 | plist = XCDR (spec); | 4602 | plist = XCDR (spec); |