From: Andreas Schwab <schwab@linux-m68k.org>
Date: Sat, 27 Feb 2010 14:28:52 +0000 (+0100)
Subject: * w32uniscribe.c (uniscribe_check_otf): Fix length check.
X-Git-Tag: emacs-pretest-23.1.94~25^2~21
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=df7e1ea0871a6e2bf07347c163222a4025b7b1a5;p=emacs.git

* w32uniscribe.c (uniscribe_check_otf): Fix length check.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index ac909cc7885..6cafe2f60a5 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2010-02-27  Andreas Schwab  <schwab@linux-m68k.org>
+
+	* w32uniscribe.c (uniscribe_check_otf): Fix length check.
+
 2010-02-27  Chong Yidong  <cyd@stupidchicken.com>
 
 	* font.c (font_parse_fcname): Recognize "Book", "Condensed",
diff --git a/src/w32uniscribe.c b/src/w32uniscribe.c
index f2bd0f44b50..cfdf629ceee 100644
--- a/src/w32uniscribe.c
+++ b/src/w32uniscribe.c
@@ -666,7 +666,7 @@ int uniscribe_check_otf (font, otf_spec)
   struct gcpro gcpro1;
 
   /* Check the spec is in the right format.  */
-  if (!CONSP (otf_spec) || Flength (otf_spec) < 3)
+  if (!CONSP (otf_spec) || XINT (Flength (otf_spec)) < 3)
     return 0;
 
   /* Break otf_spec into its components.  */