From: Gerd Moellmann <gerd@gnu.org>
Date: Tue, 26 Sep 2000 12:36:33 +0000 (+0000)
Subject: (x_decode_color): Don't return a Lisp_Object.
X-Git-Tag: emacs-pretest-21.0.90~1375
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c301be266a06abdacc9c8403f180855cccc3b738;p=emacs.git

(x_decode_color): Don't return a Lisp_Object.
---

diff --git a/src/xfns.c b/src/xfns.c
index 999c60d3143..4355bdb5010 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -1302,8 +1302,9 @@ x_decode_color (f, color_name, mono_color)
   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;
 }