From: Kenichi Handa <handa@m17n.org>
Date: Mon, 25 Feb 2008 01:45:47 +0000 (+0000)
Subject: (ftxfont_draw): Pay attention to s->padding_p.
X-Git-Tag: emacs-pretest-23.0.90~7684
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b9c2785e9f5379a45c9838bba49dcd44d7404af3;p=emacs.git

(ftxfont_draw): Pay attention to s->padding_p.
---

diff --git a/src/ftxfont.c b/src/ftxfont.c
index d7d8b710abc..d575182ef85 100644
--- a/src/ftxfont.c
+++ b/src/ftxfont.c
@@ -360,6 +360,7 @@ ftxfont_draw (s, from, to, x, y, with_background)
   int len = to - from;
   int i;
   GC *gcs;
+  int xadvance;
 
   n[0] = n[1] = n[2] = n[3] = n[4] = n[5] = n[6] = 0;
 
@@ -392,8 +393,11 @@ ftxfont_draw (s, from, to, x, y, with_background)
 			      s->clip, s->num_clips, Unsorted);
 
       for (i = 0; i < len; i++)
-	x += ftxfont_draw_bitmap (f, s->gc, gcs, font, code[i], x, y,
-				  p, 0x100, n, i + 1 == len);
+	{
+	  xadvance = ftxfont_draw_bitmap (f, s->gc, gcs, font, code[i], x, y,
+					  p, 0x100, n, i + 1 == len);
+	  x += (s->padding_p ? 1 : xadvance);
+	}
       if (s->num_clips)
 	for (i = 0; i < 6; i++)
 	  XSetClipMask (FRAME_X_DISPLAY (f), gcs[i], None);
@@ -403,8 +407,11 @@ ftxfont_draw (s, from, to, x, y, with_background)
       /* We can't draw with antialiasing.
 	 s->gc should already have a proper clipping setting. */
       for (i = 0; i < len; i++)
-	x += ftxfont_draw_bitmap (f, s->gc, NULL, font, code[i], x, y,
-				  p, 0x700, n, i + 1 == len);
+	{
+	  xadvance = ftxfont_draw_bitmap (f, s->gc, NULL, font, code[i], x, y,
+					  p, 0x700, n, i + 1 == len);
+	  x += (s->padding_p ? 1 : xadvance);
+	}
     }
 
   UNBLOCK_INPUT;