Mercurial > emacs
comparison lisp/startup.el @ 73126:5cb689e83be2
(display-splash-screen): Allow a prefix argument.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Tue, 26 Sep 2006 00:51:35 +0000 |
parents | b371147e0e3b |
children | b99c559d6365 2d56e13fd23d bb0e318b7c53 |
comparison
equal
deleted
inserted
replaced
73125:c637565b16e8 | 73126:5cb689e83be2 |
---|---|
1624 | 1624 |
1625 | 1625 |
1626 (defun display-splash-screen (&optional hide-on-input) | 1626 (defun display-splash-screen (&optional hide-on-input) |
1627 "Display splash screen according to display. | 1627 "Display splash screen according to display. |
1628 Fancy splash screens are used on graphic displays, | 1628 Fancy splash screens are used on graphic displays, |
1629 normal otherwise." | 1629 normal otherwise. |
1630 (interactive) | 1630 With a prefix argument, any user input hides the splash screen." |
1631 (interactive "P") | |
1631 (if (use-fancy-splash-screens-p) | 1632 (if (use-fancy-splash-screens-p) |
1632 (fancy-splash-screens hide-on-input) | 1633 (fancy-splash-screens hide-on-input) |
1633 (normal-splash-screen hide-on-input))) | 1634 (normal-splash-screen hide-on-input))) |
1634 | 1635 |
1635 | 1636 |