From: YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Date: Sat, 11 Aug 2007 02:06:37 +0000 (+0000)
Subject: (x_draw_image_glyph_string): Adjust stipple origin when
X-Git-Tag: emacs-pretest-22.1.90~1021
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=14e1270cdebbb0a3dbb340ae32d69ff4180d5e21;p=emacs.git

(x_draw_image_glyph_string): Adjust stipple origin when
filling pixmap with stippled background.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index dd86df3ef62..0447af98490 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-11  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
+
+	* xterm.c (x_draw_image_glyph_string): Adjust stipple origin when
+	filling pixmap with stippled background.
+
 2007-08-10  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* print.c (new_backquote_output): Rename from old_backquote_output.
diff --git a/src/xterm.c b/src/xterm.c
index 00d653fc19f..512fff35f50 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -2476,9 +2476,11 @@ x_draw_image_glyph_string (s)
 	    {
 	      /* Fill background with a stipple pattern.  */
 	      XSetFillStyle (s->display, s->gc, FillOpaqueStippled);
+	      XSetTSOrigin (s->display, s->gc, - s->x, - s->y);
 	      XFillRectangle (s->display, pixmap, s->gc,
 			      0, 0, s->background_width, s->height);
 	      XSetFillStyle (s->display, s->gc, FillSolid);
+	      XSetTSOrigin (s->display, s->gc, 0, 0);
 	    }
 	  else
 	    {