# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 969971793 0
# Node ID f526f6f002d7a380dec03e2fcac855de1b3e0379
# Parent  4e2853ad5d2d970f3f322863120a9388227d93c6
(x_decode_color): Don't return a Lisp_Object.

diff -r 4e2853ad5d2d -r f526f6f002d7 src/xfns.c
--- a/src/xfns.c	Tue Sep 26 12:35:33 2000 +0000
+++ b/src/xfns.c	Tue Sep 26 12:36:33 2000 +0000
@@ -1302,8 +1302,9 @@
   if (x_defined_color (f, XSTRING (color_name)->data, &cdef, 1))
     return cdef.pixel;
 
-  return Fsignal (Qerror, Fcons (build_string ("Undefined color"),
-				 Fcons (color_name, Qnil)));
+  Fsignal (Qerror, Fcons (build_string ("Undefined color"),
+			  Fcons (color_name, Qnil)));
+  return 0;
 }