From: YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Date: Sat, 11 Aug 2007 02:04:58 +0000 (+0000)
Subject: (x_draw_image_glyph_string): Adjust stipple origin when
X-Git-Tag: emacs-pretest-23.0.90~11531
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6c28435c8c46a74e71a7767761a3cfe2daf0466f;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 77e1a499f9d..6b13b906455 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  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
 
 	* macterm.c [TARGET_API_MAC_CARBON] (mac_handle_window_event):
diff --git a/src/xterm.c b/src/xterm.c
index d79815148be..2d9de86a445 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -2525,9 +2525,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
 	    {