Ticket #409: emacs-23.3-wide-chars-fix.patch

File emacs-23.3-wide-chars-fix.patch, 764 bytes (added by Generic Isabelle user, 9 years ago)
  • src/xdisp.c

    diff --git a/src/xdisp.c b/src/xdisp.c
    index 1f4c829..0f21c82 100644
    a b get_next_display_element (it) 
    59225922          int pos = (it->s ? -1
    59235923                     : STRINGP (it->string) ? IT_STRING_CHARPOS (*it)
    59245924                     : IT_CHARPOS (*it));
     5925          int c;
     5926
     5927          if (it->what == IT_CHARACTER)
     5928            c = it->char_to_display;
     5929          else
     5930            {
     5931              struct composition *cmp = composition_table[it->cmp_it.id];
     5932              int i;
    59255933
    5926           it->face_id = FACE_FOR_CHAR (it->f, face, it->char_to_display, pos,
    5927                                        it->string);
     5934              c = ' ';
     5935              for (i = 0; i < cmp->glyph_len; i++)
     5936                if ((c = COMPOSITION_GLYPH (cmp, i)) != '\t')
     5937                  break;
     5938            }
     5939          it->face_id = FACE_FOR_CHAR (it->f, face, c, pos, it->string);
    59285940        }
    59295941    }
    59305942#endif