Mercurial > emacs
changeset 7658:c06b9bcb12e7
(command-line-1): Precompute menu bar before startup msg.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 23 May 1994 07:47:27 +0000 |
| parents | 5d806a0a50bc |
| children | ed3bbbdd9ef5 |
| files | lisp/startup.el |
| diffstat | 1 files changed, 4 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Mon May 23 07:45:49 1994 +0000 +++ b/lisp/startup.el Mon May 23 07:47:27 1994 +0000 @@ -404,6 +404,10 @@ (and window-setup-hook (run-hooks 'window-setup-hook)) (setq window-setup-hook nil) + ;; Do this now to avoid an annoying delay if the user + ;; clicks the menu bar during the sit-for. + (precompute-menubar-bindings) + (setq menubar-bindings-done t) (unwind-protect (progn (insert (emacs-version) @@ -437,11 +441,6 @@ You may give out copies of Emacs; type \\[describe-copying] to see the conditions. Type \\[describe-distribution] for information on getting the latest version."))) (set-buffer-modified-p nil) - ;; Do this now to avoid an annoying delay if the user - ;; clicks the menu bar during the sit-for. - (sit-for 0) - (precompute-menubar-bindings) - (setq menubar-bindings-done t) (sit-for 120)) (save-excursion ;; In case the Emacs server has already selected