Mercurial > emacs
comparison lisp/startup.el @ 32617:5bc952938b50
(fancy-splash-screens): Use fancy-splash-delay.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Wed, 18 Oct 2000 14:27:20 +0000 |
| parents | 21ca5e42d4f6 |
| children | bd6de7514382 |
comparison
equal
deleted
inserted
replaced
| 32616:21ca5e42d4f6 | 32617:5bc952938b50 |
|---|---|
| 1015 (setq cursor-type nil | 1015 (setq cursor-type nil |
| 1016 display-busy-cursor nil | 1016 display-busy-cursor nil |
| 1017 buffer-undo-list t | 1017 buffer-undo-list t |
| 1018 mode-line-format | 1018 mode-line-format |
| 1019 (propertize "---- %b %-" 'face '(:weight bold)) | 1019 (propertize "---- %b %-" 'face '(:weight bold)) |
| 1020 timer (run-with-timer 0 5 #'fancy-splash-screens-1 | 1020 timer (run-with-timer 0 fancy-splash-delay |
| 1021 #'fancy-splash-screens-1 | |
| 1021 splash-buffer)) | 1022 splash-buffer)) |
| 1022 (recursive-edit)) | 1023 (recursive-edit)) |
| 1023 (cancel-timer timer) | 1024 (cancel-timer timer) |
| 1024 (setq display-busy-cursor old-busy-cursor) | 1025 (setq display-busy-cursor old-busy-cursor) |
| 1025 (kill-buffer splash-buffer)))) | 1026 (kill-buffer splash-buffer)))) |