[Emacs-diffs] Changes to emacs/lisp/startup.el

[Kim F . Storm]

Index: emacs/lisp/startup.el
diff -c emacs/lisp/startup.el:1.378 emacs/lisp/startup.el:1.379
*** emacs/lisp/startup.el:1.378 Sun Oct  9 06:58:13 2005
--- emacs/lisp/startup.el       Wed Oct 12 11:22:57 2005
***************
*** 1250,1256 ****
  the user caused an input event by hitting a key or clicking with the
  mouse."
    (interactive)
!   (push last-command-event unread-command-events)
    (throw 'exit nil))
  
  
--- 1250,1262 ----
  the user caused an input event by hitting a key or clicking with the
  mouse."
    (interactive)
!   (if (and (consp last-command-event)
!          (eq (posn-window (event-start last-command-event))
!              (selected-window)))
!       ;; This is a mouse-down event in the spash screen window.
!       ;; Ignore it and consume the corresponding mouse-up event.
!       (read-event)
!     (push last-command-event unread-command-events))
    (throw 'exit nil))