[Emacs-diffs] Changes to emacs/src/msdos.c [lexbind]

[Miles Bader]

Index: emacs/src/msdos.c
diff -c emacs/src/msdos.c:1.173.2.7 emacs/src/msdos.c:1.173.2.8
*** emacs/src/msdos.c:1.173.2.7 Tue Jul  6 09:14:37 2004
--- emacs/src/msdos.c   Tue Jul  6 09:24:06 2004
***************
*** 951,958 ****
  IT_write_glyphs (struct glyph *str, int str_len)
  {
    unsigned char *screen_buf, *screen_bp, *screen_buf_end, *bp;
!   int unsupported_face = FAST_GLYPH_FACE (Vdos_unsupported_char_glyph);
!   unsigned unsupported_char= FAST_GLYPH_CHAR (Vdos_unsupported_char_glyph);
    int offset = 2 * (new_pos_X + screen_size_X * new_pos_Y);
    register int sl = str_len;
    register int tlen = GLYPH_TABLE_LENGTH;
--- 951,958 ----
  IT_write_glyphs (struct glyph *str, int str_len)
  {
    unsigned char *screen_buf, *screen_bp, *screen_buf_end, *bp;
!   int unsupported_face = 0;
!   unsigned unsupported_char = '\177';
    int offset = 2 * (new_pos_X + screen_size_X * new_pos_Y);
    register int sl = str_len;
    register int tlen = GLYPH_TABLE_LENGTH;
***************
*** 978,983 ****
--- 978,990 ----
  
    if (str_len <= 0) return;
  
+   /* Set up the unsupported character glyph */
+   if (!NILP (Vdos_unsupported_char_glyph))
+     {
+       unsupported_char = FAST_GLYPH_CHAR (XINT (Vdos_unsupported_char_glyph));
+       unsupported_face = FAST_GLYPH_FACE (XINT (Vdos_unsupported_char_glyph));
+     }
+ 
    screen_buf = screen_bp = alloca (str_len * 2);
    screen_buf_end = screen_buf + str_len * 2;
    sf = SELECTED_FRAME();
***************
*** 1042,1048 ****
          if (! CHAR_VALID_P (ch, 0))
            {
              g = !NILP (Vdos_unsupported_char_glyph)
!               ? Vdos_unsupported_char_glyph
                : MAKE_GLYPH (sf, '\177', GLYPH_FACE (sf, g));
              ch = FAST_GLYPH_CHAR (g);
            }
--- 1049,1055 ----
          if (! CHAR_VALID_P (ch, 0))
            {
              g = !NILP (Vdos_unsupported_char_glyph)
!               ? XINT (Vdos_unsupported_char_glyph)
                : MAKE_GLYPH (sf, '\177', GLYPH_FACE (sf, g));
              ch = FAST_GLYPH_CHAR (g);
            }
***************
*** 5280,5286 ****
    DEFVAR_LISP ("dos-unsupported-char-glyph", &Vdos_unsupported_char_glyph,
               doc: /* *Glyph to display instead of chars not supported by 
current codepage.
  This variable is used only by MSDOS terminals.  */);
!   Vdos_unsupported_char_glyph = '\177';
  
  #endif
  #ifndef subprocesses
--- 5287,5293 ----
    DEFVAR_LISP ("dos-unsupported-char-glyph", &Vdos_unsupported_char_glyph,
               doc: /* *Glyph to display instead of chars not supported by 
current codepage.
  This variable is used only by MSDOS terminals.  */);
!   Vdos_unsupported_char_glyph = make_number ('\177');
  
  #endif
  #ifndef subprocesses