Re: why `fancy-splash-default-action' is interactive?

[Oliver Scholz]

address@hidden (Janusz S. Bień) writes:
[...]
> OK, now I understand its purpose.
>
> However, I still have objections to its documentation string:
>
>         Default action for events in the splash screen buffer.
>
> As it shows in `C-h a' results, event a novice should get an idea
> about its purpose, and/or get understandable diagnostics when he tries
> to use it.
>
> What about e.g.
>
>         Internal function needed for switching off the splash buffer.
>
> Best regards
[...]

How about

Index: startup.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/startup.el,v
retrieving revision 1.311
diff -c -r1.311 startup.el
*** startup.el  26 Oct 2002 22:41:33 -0000      1.311
--- startup.el  8 May 2003 09:20:52 -0000
***************
*** 1278,1284 ****
  
  
  (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))
--- 1278,1287 ----
  
  
  (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))


    Oliver
-- 
19 Floréal an 211 de la Révolution
Liberté, Egalité, Fraternité!