comparison lisp/startup.el @ 50933:457e1ff9ea4a

(fancy-splash-default-action): Fix docstring.

50932:4becc854f9f6

    (force-mode-line-update)
    (setq fancy-current-text (cdr fancy-current-text))))


(defun fancy-splash-default-action ()
  "Default action for events in the splash screen buffer."
  (interactive)
  (push last-command-event unread-command-events)
  (throw 'exit nil))

50933:457e1ff9ea4a

    (force-mode-line-update)
    (setq fancy-current-text (cdr fancy-current-text))))


(defun fancy-splash-default-action ()
  "Stop displaying the splash screen buffer.
This is an internal function used to turn off the splash screen after
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))