(x_draw_glyph_string): Use strike_through_color, not underline_color,

to draw strike-through.

2 files changed, 18 insertions, 12 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 88f20719f75..7dabc396407 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2007-09-21  Juanma Barranquero  <lekktu@gmail.com>
+
+        * w32term.c (x_draw_glyph_string): Use strike_through_color, not
+        underline_color, to draw strike-through.
+
 2007-09-20  Glenn Morris  <rgm@gnu.org>
 
         * process.c (Fmake_network_process): Doc fix.
@@ -30,7 +35,8 @@
         scope and rename to omfib_buffer for clarity.
         (gif_load) <interlace_start, interlace_increment>: Move to file scope.
 
-2007-09-14  Peter O'Gorman <bug-gnu-emacs@mlists.thewrittenword.com> (tiny change)
+2007-09-14  Peter O'Gorman  <bug-gnu-emacs@mlists.thewrittenword.com>  (tiny change)
+
         * gtkutil.c (xg_get_file_with_chooser): Move GCPRO1 after declarations.
 
         * termhooks.h (enum event_kind): Remove trailing comma.
@@ -66,15 +72,15 @@
 2007-09-02  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
 
         * keyboard.c: Qrtl is new.
-        (parse_tool_bar_item): Handle :rtl keyword.
-        (syms_of_keyboard): Intern :rtl keyword.
+        (parse_tool_bar_item): Handle :rtl keyword.
+        (syms_of_keyboard): Intern :rtl keyword.
 
         * dispextern.h (enum tool_bar_item_idx): Add TOOL_BAR_ITEM_RTL_IMAGE.
 
-        * gtkutil.c: (file_for_image, find_rtl_image): New functions.
-        (xg_get_image_for_pixmap): Use file_for_image
-        (update_frame_tool_bar): If direction is RTL, use RTL image if
-        defined.  Use Gtk stock images or named theme icons if defined.
+        * gtkutil.c (file_for_image, find_rtl_image): New functions.
+        (xg_get_image_for_pixmap): Use file_for_image
+        (update_frame_tool_bar): If direction is RTL, use RTL image if
+        defined.  Use Gtk stock images or named theme icons if defined.
 
 2007-08-29  Martin Rudalics  <rudalics@gmx.at>
 
diff --git a/src/w32term.c b/src/w32term.c
index 0422257f2d6..e56a74e0edd 100644
--- a/src/w32term.c
+++ b/src/w32term.c
@@ -2547,10 +2547,10 @@ x_draw_glyph_string (s)
           unsigned long dy = 0, h = 1;
 
           if (s->face->overline_color_defaulted_p)
-        {
-          w32_fill_area (s->f, s->hdc, s->gc->foreground, s->x,
-                         s->y + dy, s->background_width, h);
-        }
+            {
+              w32_fill_area (s->f, s->hdc, s->gc->foreground, s->x,
+                             s->y + dy, s->background_width, h);
+            }
           else
             {
               w32_fill_area (s->f, s->hdc, s->face->overline_color, s->x,
@@ -2572,7 +2572,7 @@ x_draw_glyph_string (s)
             }
           else
             {
-              w32_fill_area (s->f, s->hdc, s->face->underline_color, s->x,
+              w32_fill_area (s->f, s->hdc, s->face->strike_through_color, s->x,
                              s->y + dy, s->width, h);
             }
         }