From 0016fa11a71bff9c8e70a98723cefc1582389dff Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Tue, 3 Jun 2014 12:50:04 +0300 Subject: [PATCH] Minor fix of the last commit in menu-bar-open. lisp/menu-bar.el (menu-bar-open): Fix last change: use the PC '(redisplay)' instead of '(sit-for 0)'. --- lisp/ChangeLog | 5 +++++ lisp/menu-bar.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d73300523e9..2ca78add203 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-06-03 Eli Zaretskii + + * menu-bar.el (menu-bar-open): Fix last change: use the PC + 'redisplay' instead of '(sit-for 0)'. + 2014-06-03 Michael Albinus * net/tramp.el (tramp-ssh-controlmaster-options): Improve search diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 8658a31cb58..19c8bdd4e24 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -2272,7 +2272,7 @@ If FRAME is nil or not given, use the selected frame." ;; via M-x, in which case the menu bar includes the "Minibuf" ;; menu item that should be removed when we exit the minibuffer. (force-mode-line-update) - (sit-for 0) + (redisplay) (let* ((x tty-menu--initial-menu-x) (menu (menu-bar-menu-at-x-y x 0 frame))) (popup-menu (or -- 2.39.5