From: Richard M. Stallman Date: Wed, 11 Sep 1996 03:47:43 +0000 (+0000) Subject: (easy-menu-do-define): Use `x-popup-menu' instead of X-Git-Tag: emacs-20.1~3784 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=94ddbbff9b02de39ea827dac914294945440118f;p=emacs.git (easy-menu-do-define): Use `x-popup-menu' instead of non-existing `easy-popup-menu'. --- diff --git a/lisp/emacs-lisp/easymenu.el b/lisp/emacs-lisp/easymenu.el index df3cc03cae8..624dd0b8363 100644 --- a/lisp/emacs-lisp/easymenu.el +++ b/lisp/emacs-lisp/easymenu.el @@ -106,7 +106,7 @@ is a list of menu items, as above." ;; function. (set symbol (easy-menu-create-keymaps (car menu) (cdr menu))) (fset symbol (` (lambda (event) (, doc) (interactive "@e") - (easy-popup-menu event (, symbol))))) + (x-popup-menu event (, symbol))))) (mapcar (function (lambda (map) (define-key map (vector 'menu-bar (intern (car menu))) (cons (car menu) (symbol-value symbol)))))