summaryrefslogtreecommitdiff
path: root/lisp/tmm.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-01-24 21:59:32 +0000
committerKarl Heuer <kwzh@gnu.org>1996-01-24 21:59:32 +0000
commit3132f3193d761665debddad0d4a448864b1038a9 (patch)
tree9f3bdeea7ee90852733ee2c6021f9bb72a8672cf /lisp/tmm.el
parent690b03fe58e99a7d3144a8d032c491cde7d950e4 (diff)
downloademacs-3132f3193d761665debddad0d4a448864b1038a9.tar.gz
(tmm-prompt): Set last-command-event before calling the
selected function.
Diffstat (limited to 'lisp/tmm.el')
-rw-r--r--lisp/tmm.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/tmm.el b/lisp/tmm.el
index ed5a93024c9..4215f1b5b72 100644
--- a/lisp/tmm.el
+++ b/lisp/tmm.el
@@ -214,7 +214,9 @@ Its value should be an event that has a binding in MENU."
;; We just handled a menu keymap and found a command.
(choice
(if chosen-string
- (call-interactively choice)
+ (progn
+ (setq last-command-event chosen-string)
+ (call-interactively choice))
choice)))))