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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d73300523e95a319ef181fbef85d8ff67786fca9..2ca78add203afca65a17270897660d3865c2c159 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-06-03  Eli Zaretskii  <eliz@gnu.org>
+
+       * menu-bar.el (menu-bar-open): Fix last change: use the PC
+       'redisplay' instead of '(sit-for 0)'.
+
 2014-06-03  Michael Albinus  <michael.albinus@gmx.de>
 
        * net/tramp.el (tramp-ssh-controlmaster-options): Improve search

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 8658a31cb585f17f95e32503f3573dac9c64a71e..19c8bdd4e24d89a04d5a58b2437c2246f2eeb596 100644 (file)
--- 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