Mercurial > hg > xemacs-beta

diff src/console-impl.h @ 2527:491f8cf78a9c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2005-01-28 02:58:38 by ben] Abstract font-list/color-list font-menu.el, font.el, frame.el, gtk-font-menu.el, minibuf.el, msw-faces.el, msw-font-menu.el, obsolete.el, x-faces.el, x-font-menu.el: list-fonts->font-list. Create color-list. Abstract out x/msw-specific versions and obsolete the x/msw-specific Lisp functions. console-impl.h, objects-gtk.c, objects-msw.c, objects-tty.c, objects-x.c, objects.c: list-fonts->font-list. Create color-list. Abstract out x/msw-specific versions and obsolete the x/msw-specific Lisp functions.
author ben
date Fri, 28 Jan 2005 02:58:52 +0000
parents ecf1ebac70d8
children 6fa9919a9a0b
line wrap: on
line diff
--- a/src/console-impl.h	Fri Jan 28 02:36:28 2005 +0000
+++ b/src/console-impl.h	Fri Jan 28 02:58:52 2005 +0000
@@ -192,6 +192,7 @@
 					   int depth);
   Lisp_Object (*color_instance_rgb_components_method) (Lisp_Color_Instance *);
   int (*valid_color_name_p_method) (struct device *, Lisp_Object color);
+  Lisp_Object (*color_list_method) (void);
 
   /* font methods */
   int (*initialize_font_instance_method) (Lisp_Font_Instance *,
@@ -206,7 +207,7 @@
   Lisp_Object (*font_instance_truename_method) (Lisp_Font_Instance *,
 						Error_Behavior errb);
   Lisp_Object (*font_instance_properties_method) (Lisp_Font_Instance *);
-  Lisp_Object (*list_fonts_method) (Lisp_Object pattern,
+  Lisp_Object (*font_list_method) (Lisp_Object pattern,
 				    Lisp_Object device,
 				    Lisp_Object maxnumber);
   Lisp_Object (*find_charset_font_method) (Lisp_Object device,