Mercurial > emacs
changeset 95871:75191063f8b6
(menu-set-font): Use fboundp rather than functionp.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Fri, 13 Jun 2008 04:16:42 +0000 |
parents | 2169bb17fe3d |
children | 7d6cf08604f7 |
files | lisp/menu-bar.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/menu-bar.el Fri Jun 13 04:16:23 2008 +0000 +++ b/lisp/menu-bar.el Fri Jun 13 04:16:42 2008 +0000 @@ -632,7 +632,7 @@ (defun menu-set-font () "Interactively select a font and make it the default." (interactive) - (let ((font (if (functionp 'x-select-font) + (let ((font (if (fboundp 'x-select-font) (x-select-font) (mouse-select-font))) spec)