# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1199708910 0
# Node ID 3f56aab091eda0f06ce09cb49155dce02e121d46
# Parent  9b6270bcd1a758f184c432809fe61ecdaf1529f2
(Ffont_shape_text): Fix setting of `to' field of glyphs.

diff -r 9b6270bcd1a7 -r 3f56aab091ed src/font.c
--- a/src/font.c	Mon Jan 07 02:08:28 2008 +0000
+++ b/src/font.c	Mon Jan 07 12:28:30 2008 +0000
@@ -3687,7 +3687,7 @@
 	      Lisp_Object g = LGSTRING_GLYPH (gstring, i);
 
 	      LGLYPH_SET_FROM (g, LGLYPH_FROM (g) - this_from);
-	      LGLYPH_SET_TO (g, LGLYPH_TO (g) - this_to);
+	      LGLYPH_SET_TO (g, LGLYPH_TO (g) - this_from);
 	      LGSTRING_SET_GLYPH (gstr, i - k, LGSTRING_GLYPH (gstring, i));
 	    }
 	  from = make_number (start + this_from);