# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1180353462 0
# Node ID ef753be93cdb8fa800565f8346bd0f6a74777393
# Parent  72f531d048d8ebd7983b094bebf2572874c60c0f
(make-glyph-code): Fix previous change.

diff -r 72f531d048d8 -r ef753be93cdb lisp/disp-table.el
--- a/lisp/disp-table.el	Mon May 28 06:52:57 2007 +0000
+++ b/lisp/disp-table.el	Mon May 28 11:57:42 2007 +0000
@@ -191,7 +191,7 @@
   "Return a glyph code representing char CHAR with face FACE."
   ;; Due to limitations on Emacs integer values, faces with
   ;; face id greater that 512 are silently ignored.
-  (if (and face (<= (face-id face) #xfff))
+  (if (and face (<= (face-id face) #x1ff))
       (logior char (lsh (face-id face) 22))
     char))