Fix cursor display (bug#23993)

[gnu-emacs] / src / xdisp.c

diff --git a/src/xdisp.c b/src/xdisp.c
index d5ffb25eb18ab68e320d6e41dba607c494670d18..efd5f54fa39f57a6b4c0d9cb32bfa2029c52998f 100644 (file)
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -2237,7 +2237,7 @@ get_phys_cursor_geometry (struct window *w, struct glyph_row *row,
   ascent = row->ascent;
   if (row->ascent < glyph->ascent)
     {
-      y =- glyph->ascent - row->ascent;
+      y -= glyph->ascent - row->ascent;
       ascent = glyph->ascent;
     }
 
@@ -27369,8 +27369,8 @@ x_produce_glyphs (struct it *it)
 
          eassume (0 < glyph_len); /* See Bug#8512.  */
          do
-           c = COMPOSITION_GLYPH (cmp, --glyph_len);
-         while (c == '\t' && 0 < glyph_len);
+           c = COMPOSITION_GLYPH (cmp, glyph_len - 1);
+         while (c == '\t' && 0 < --glyph_len);
 
          bool right_padded = glyph_len < cmp->glyph_len;
          for (i = 0; i < glyph_len; i++)