Mercurial > emacs
changeset 24964:22d526660026
(mouse-set-font): If user uses w32 dialog but
selects no font, treat that as zero selections, not one.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 20 Jul 1999 00:49:54 +0000 |
parents | a78f0c2654d6 |
children | 88883af036ca |
files | lisp/term/w32-win.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/term/w32-win.el Mon Jul 19 22:21:44 1999 +0000 +++ b/lisp/term/w32-win.el Tue Jul 20 00:49:54 1999 +0000 @@ -900,7 +900,8 @@ with the font." (interactive (if w32-use-w32-font-dialog - (list (w32-select-font)) + (let ((chosen-font (w32-select-font))) + (and chosen-font (list chosen-font))) (x-popup-menu last-nonmenu-event ;; Append list of fontsets currently defined.