(x-popup-menu `((0 0) ,(get-window-with-predicate (lambda (win) t))) (tmm-get-keybind [menu-bar]))

keymap prompt (keymap-prompt (cadr (tmm-get-keybind [menu-bar])))