X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgtk-faces.el;fp=lisp%2Fgtk-faces.el;h=a92b3ceef92cc3f3e6958aed003f98f3eff5376e;hb=426fe636212336bb32a5e6f187c4d623709fa57d;hp=3a6824c8104e1dee708139916559486fa7af0f52;hpb=21db8709c0c2dcedbd278c7fe571290d5ce80a71;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/gtk-faces.el b/lisp/gtk-faces.el
index 3a6824c..a92b3ce 100644
--- a/lisp/gtk-faces.el
+++ b/lisp/gtk-faces.el
@@ -51,7 +51,7 @@
   (if (not (eq (device-type device) 'gtk))
       nil
     (gtk-init-pointers)
-    '(let* ((style (gtk-style-info device))
+    (let* ((style (gtk-style-info device))
 	   ;;(normal 0)			; GTK_STATE_NORMAL
 	   ;;(active 1)			; GTK_STATE_ACTIVE
 	   (prelight 2)			; GTK_STATE_PRELIGHT