summaryrefslogtreecommitdiff
path: root/lisp/menu-bar.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2008-06-12 15:30:04 +0000
committerChong Yidong <cyd@stupidchicken.com>2008-06-12 15:30:04 +0000
commita81a17c5fab3f1f12faf500066f4a200e66c9283 (patch)
tree1723bd2dce74b92fab6287322f421b4ddd130366 /lisp/menu-bar.el
parented6fd57fbde635b492eada7847029efbf280db67 (diff)
downloademacs-a81a17c5fab3f1f12faf500066f4a200e66c9283.tar.gz
(menu-set-font): Renamed x-font-dialog to x-select-font.
Diffstat (limited to 'lisp/menu-bar.el')
-rw-r--r--lisp/menu-bar.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 66793a4a805..aa7cd194acf 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -632,8 +632,8 @@ by \"Save Options\" in Custom buffers.")
(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