Ticket #305: del_frame.patch

File del_frame.patch, 2.7 kB (added by anonymous, 2 years ago)

パッチ

  • xdisp.c

    old new  
    2172421724     struct frame *f; 
    2172521725     int on_p; 
    2172621726{ 
     21727#ifdef MEADOW 
     21728  if (!NILP (f->root_window)) 
     21729    update_cursor_in_window_tree (XWINDOW (f->root_window), on_p); 
     21730#else     
    2172721731  update_cursor_in_window_tree (XWINDOW (f->root_window), on_p); 
     21732#endif 
    2172821733} 
    2172921734 
    2173021735 

  • mw32term.c

    old new  
    48254825          goto dflt; 
    48264826 
    48274827        case WM_NCMOUSEMOVE: 
    4828           mw32_clear_mouse_face (f); 
    4829           dpyinfo->mouse_face_mouse_frame = NULL; 
    4830           last_mouse_motion_frame = Qnil; 
    4831  
    4832           /* Generate a nil HELP_EVENT to cancel a help-echo. 
    4833              Do it only if there's something to cancel. 
    4834              Otherwise, the startup message is cleared when 
    4835              the mouse leaves the frame.  */ 
    4836           if (msg.wParam && any_help_event_p) 
     4828          if (f) 
    48374829            { 
    4838               Lisp_Object frame; 
     4830              mw32_clear_mouse_face (f); 
     4831              dpyinfo->mouse_face_mouse_frame = NULL; 
     4832              last_mouse_motion_frame = Qnil; 
    48394833 
    4840               XSETFRAME (frame, f); 
    4841               help_echo_string = Qnil; 
    4842               gen_help_event (Qnil, frame, Qnil, Qnil, 0); 
    4843               any_help_event_p = 0; 
     4834              /* Generate a nil HELP_EVENT to cancel a help-echo. 
     4835                 Do it only if there's something to cancel. 
     4836                 Otherwise, the startup message is cleared when 
     4837                 the mouse leaves the frame.  */ 
     4838              if (msg.wParam && any_help_event_p) 
     4839                { 
     4840                  Lisp_Object frame; 
     4841 
     4842                  XSETFRAME (frame, f); 
     4843                  help_echo_string = Qnil; 
     4844                  gen_help_event (Qnil, frame, Qnil, Qnil, 0); 
     4845                  any_help_event_p = 0; 
     4846                } 
    48444847            } 
    48454848 
    48464849          goto dflt; 
    …… 
    50195022            the help echo message. 
    50205023          */ 
    50215024        case WM_EMACS_CLEAR_MOUSE_FACE: 
    5022           mw32_clear_mouse_face (f); 
    5023  
    5024           /* Generate a nil HELP_EVENT to cancel a help-echo. 
    5025              Do it only if there's something to cancel. 
    5026              Otherwise, the startup message is cleared when 
    5027              the mouse leaves the frame.  */ 
    5028           if (msg.wParam && any_help_event_p) 
     5025          if (f) 
    50295026            { 
    5030               Lisp_Object frame; 
     5027              mw32_clear_mouse_face (f); 
    50315028 
    5032               XSETFRAME (frame, f); 
    5033               help_echo_string = Qnil; 
    5034               gen_help_event (Qnil, frame, Qnil, Qnil, 0); 
    5035               any_help_event_p = 0; 
     5029              /* Generate a nil HELP_EVENT to cancel a help-echo. 
     5030                 Do it only if there's something to cancel. 
     5031                 Otherwise, the startup message is cleared when 
     5032                 the mouse leaves the frame.  */ 
     5033              if (msg.wParam && any_help_event_p) 
     5034                { 
     5035                  Lisp_Object frame; 
     5036 
     5037                  XSETFRAME (frame, f); 
     5038                  help_echo_string = Qnil; 
     5039                  gen_help_event (Qnil, frame, Qnil, Qnil, 0); 
     5040                  any_help_event_p = 0; 
     5041                } 
    50365042            } 
    50375043          break; 
    50385044