Mercurial > hg > xemacs-beta

diff lisp/utils/facemenu.el @ 131:869e1851236b xemacs-20-1p4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag xemacs-20-1p4
author cvs
date Mon, 13 Aug 2007 09:29:07 +0200
parents 1370575f1259
children e45d5e7c476e
line wrap: on
line diff
--- a/lisp/utils/facemenu.el	Mon Aug 13 09:28:40 2007 +0200
+++ b/lisp/utils/facemenu.el	Mon Aug 13 09:29:07 2007 +0200
@@ -269,8 +269,7 @@
   ;; Global bindings:
   (if (string-match "XEmacs" emacs-version)
       (easy-menu-change '("Edit") (car facemenu-menu) (cdr facemenu-menu))
-    (define-key global-map [C-down-mouse-2] 'facemenu-menu))
-  (if facemenu-key (define-key global-map facemenu-key 'facemenu-keymap)))
+    (define-key global-map [C-down-mouse-2] 'facemenu-menu)))
 
 (fset 'facemenu-region-active-p
       (if (string-match "XEmacs" emacs-version)