Mercurial > emacs
diff src/xfns.c @ 72529:892ea79efee6
(Fxw_color_values): Simplify; use list3.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Fri, 25 Aug 2006 23:33:04 +0000 |
parents | 3f1637b3adcb |
children | e00572984112 694bbb62a75d 6823a91487f2 |
line wrap: on
line diff
--- a/src/xfns.c Fri Aug 25 23:32:17 2006 +0000 +++ b/src/xfns.c Fri Aug 25 23:33:04 2006 +0000 @@ -3475,14 +3475,9 @@ CHECK_STRING (color); if (x_defined_color (f, SDATA (color), &foo, 0)) - { - Lisp_Object rgb[3]; - - rgb[0] = make_number (foo.red); - rgb[1] = make_number (foo.green); - rgb[2] = make_number (foo.blue); - return Flist (3, rgb); - } + return list3 (make_number (foo.red), + make_number (foo.green), + make_number (foo.blue)); else return Qnil; }