diff options
author | Eli Zaretskii <eliz@gnu.org> | 2014-06-03 12:50:04 +0300 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2014-06-03 12:50:04 +0300 |
commit | 0016fa11a71bff9c8e70a98723cefc1582389dff (patch) | |
tree | a90fecd4c9ad468261adec03abeca0aa535abb75 /lisp | |
parent | a336b2eae3b52f6fba5a19cc98e780feca618115 (diff) | |
download | emacs-0016fa11a71bff9c8e70a98723cefc1582389dff.tar.gz emacs-0016fa11a71bff9c8e70a98723cefc1582389dff.tar.bz2 emacs-0016fa11a71bff9c8e70a98723cefc1582389dff.zip |
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)'.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/menu-bar.el | 2 |
2 files changed, 6 insertions, 1 deletions
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 <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 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 |