Mercurial > hg > xemacs-beta

diff lisp/font.el @ 263:727739f917cb r20-5b30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b30
author cvs
date Mon, 13 Aug 2007 10:24:41 +0200
parents d44af0c54775
children 7df0dd720c89
line wrap: on
line diff
--- a/lisp/font.el	Mon Aug 13 10:23:52 2007 +0200
+++ b/lisp/font.el	Mon Aug 13 10:24:41 2007 +0200
@@ -47,7 +47,7 @@
     (defun try-font-name (fontname &rest args)
       (case window-system
 	((x pm) (car-safe (x-list-fonts fontname)))
-	(mswindows (car-safe (x-list-fonts fontname))) ; XXX FIXME
+	(mswindows (car-safe (mswindows-list-fonts fontname)))
 	(ns (car-safe (ns-list-fonts fontname)))
 	(otherwise nil))))