Mercurial > hg > xemacs-beta
diff src/objects-msw.c @ 1701:a1e328407366
[xemacs-hg @ 2003-09-20 01:14:24 by youngs]
2003-09-20 James LewisMoss <dres@lewismoss.org>
* console-impl.h (struct console_methods): add third arg to list_fonts
* objects.c (Flist_fonts): Add third arg to list-fonts: maxnumber
* objects-gtk.c (gtk_list_fonts): Add third (ignored) arg for
maxnumber.
* objects-msw.c (mswindows_list_fonts): Add third (ignored) arg for
maxnumber.
* objects-tty.c (tty_list_fonts): Add third (ignored) arg for
maxnumber.
* objects-x.c (x_list_fonts): Add third arg to specify the maximum
fonts recieved from the server.
2003-09-20 James LewisMoss <dres@lewismoss.org>
* font-menu.el (font-menu-max-number): New variable to specify
the maximum recieved fonts.
* x-font-menu.el (x-reset-device-font-menus): Use new variable
(font-menu-max-number) to list-fonts.
author | youngs |
---|---|
date | Sat, 20 Sep 2003 01:14:30 +0000 |
parents | 79c6ff3eef26 |
children | 9fc738581a9d |
line wrap: on
line diff
--- a/src/objects-msw.c Fri Sep 19 17:07:07 2003 +0000 +++ b/src/objects-msw.c Sat Sep 20 01:14:30 2003 +0000 @@ -1924,7 +1924,8 @@ } static Lisp_Object -mswindows_list_fonts (Lisp_Object pattern, Lisp_Object device) +mswindows_list_fonts (Lisp_Object pattern, Lisp_Object device, + Lisp_Object maxnumber) { struct device *d = XDEVICE (device); Lisp_Object font_list = Qnil, fonttail, result = Qnil;