[Emacs-diffs] Changes to emacs/lisp/menu-bar.el,v

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      08/06/12 15:30:05

Index: menu-bar.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/menu-bar.el,v
retrieving revision 1.338
retrieving revision 1.339
diff -u -b -r1.338 -r1.339
--- menu-bar.el 12 Jun 2008 03:54:06 -0000      1.338
+++ menu-bar.el 12 Jun 2008 15:30:04 -0000      1.339
@@ -632,8 +632,8 @@
 (defun menu-set-font ()
   "Interactively select a font and make it the default."
   (interactive)
-  (let ((font (if (functionp 'x-font-dialog)
-                 (x-font-dialog)
+  (let ((font (if (functionp 'x-select-font)
+                 (x-select-font)
                (mouse-select-font)))
        spec)
     (when font