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)))) |