Commit 630b9592 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

* w32fns.c (w32_to_x_color): Remove, unused.

parent 0c1085c5
2010-07-24 Juanma Barranquero <lekktu@gmail.com>
* w32fns.c (w32_to_x_color): Remove, unused.
2010-07-24 Andreas Schwab <schwab@linux-m68k.org> 2010-07-24 Andreas Schwab <schwab@linux-m68k.org>
   
* lisp.h: Remove leftover P_. * lisp.h: Remove leftover P_.
......
...@@ -785,25 +785,6 @@ DEFUN ("w32-default-color-map", Fw32_default_color_map, Sw32_default_color_map, ...@@ -785,25 +785,6 @@ DEFUN ("w32-default-color-map", Fw32_default_color_map, Sw32_default_color_map,
return (cmap); return (cmap);
} }
static Lisp_Object
w32_to_x_color (Lisp_Object rgb)
{
Lisp_Object color;
CHECK_NUMBER (rgb);
BLOCK_INPUT;
color = Frassq (rgb, Vw32_color_map);
UNBLOCK_INPUT;
if (!NILP (color))
return (Fcar (color));
else
return Qnil;
}
static Lisp_Object static Lisp_Object
w32_color_map_lookup (char *colorname) w32_color_map_lookup (char *colorname)
{ {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment