/[emacs]/emacs/src/msdos.c
ViewVC logotype

Diff of /emacs/src/msdos.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.156 by kfstorm, Fri Nov 16 13:04:02 2001 UTC revision 1.157 by eliz, Fri Nov 23 17:14:33 2001 UTC
# Line 413  extern int unibyte_display_via_language_ Line 413  extern int unibyte_display_via_language_
413    
414  Lisp_Object Qbar;  Lisp_Object Qbar;
415    
416    /* The screen colors of the curent frame, which serve as the default
417       colors for newly-created frames.  */
418    static int initial_screen_colors[2];
419    
420  #if __DJGPP__ > 1  #if __DJGPP__ > 1
421  /* Update the screen from a part of relocated DOS/V screen buffer which  /* Update the screen from a part of relocated DOS/V screen buffer which
422     begins at OFFSET and includes COUNT characters.  */     begins at OFFSET and includes COUNT characters.  */
# Line 1797  IT_clear_screen (void) Line 1801  IT_clear_screen (void)
1801  {  {
1802    if (termscript)    if (termscript)
1803      fprintf (termscript, "<CLR:SCR>");      fprintf (termscript, "<CLR:SCR>");
1804    IT_set_face (0);    /* We are sometimes called (from clear_garbaged_frames) when a new
1805         frame is being created, but its faces are not yet realized.  In
1806         such a case we cannot call IT_set_face, since it will fail to find
1807         any valid faces and will abort.  Instead, use the initial screen
1808         colors; that should mimic what a Unix tty does, which simply clears
1809         the screen with whatever default colors are in use.  */
1810      if (FACE_FROM_ID (SELECTED_FRAME (), DEFAULT_FACE_ID) == NULL)
1811        ScreenAttrib = (initial_screen_colors[0] << 4) | initial_screen_colors[1];
1812      else
1813        IT_set_face (0);
1814    mouse_off ();    mouse_off ();
1815    ScreenClear ();    ScreenClear ();
1816    if (screen_virtual_segment)    if (screen_virtual_segment)
# Line 2275  IT_set_terminal_window (int foo) Line 2288  IT_set_terminal_window (int foo)
2288    
2289  /* Remember the screen colors of the curent frame, to serve as the  /* Remember the screen colors of the curent frame, to serve as the
2290     default colors for newly-created frames.  */     default colors for newly-created frames.  */
   
 static int initial_screen_colors[2];  
   
2291  DEFUN ("msdos-remember-default-colors", Fmsdos_remember_default_colors,  DEFUN ("msdos-remember-default-colors", Fmsdos_remember_default_colors,
2292         Smsdos_remember_default_colors, 1, 1, 0,         Smsdos_remember_default_colors, 1, 1, 0,
2293    "Remember the screen colors of the current frame.")    "Remember the screen colors of the current frame.")

Legend:
Removed from v.1.156  
changed lines
  Added in v.1.157

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26