/[emacs]/emacs/src/xfaces.c
ViewVC logotype

Diff of /emacs/src/xfaces.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.250.2.4 by handa, Fri Jul 26 04:07:39 2002 UTC revision 1.250.2.5 by fx, Tue Jul 30 11:38:05 2002 UTC
# Line 2176  Lisp_Object Line 2176  Lisp_Object
2176  font_name_registry (fontname)  font_name_registry (fontname)
2177       Lisp_Object fontname;       Lisp_Object fontname;
2178  {  {
   Lisp_Object registry;  
2179    struct font_name font;    struct font_name font;
   char *p;  
2180    
2181    font.name = LSTRDUPA (fontname);    font.name = LSTRDUPA (fontname);
2182    if (! split_font_name (NULL, &font, 0))    if (! split_font_name (NULL, &font, 0))
# Line 6123  try_alternative_families (f, family, reg Line 6121  try_alternative_families (f, family, reg
6121  static int  static int
6122  try_font_list (f, pattern, family, registry, fonts)  try_font_list (f, pattern, family, registry, fonts)
6123       struct frame *f;       struct frame *f;
6124       Lisp_Object family, registry;       Lisp_Object pattern, family, registry;
6125       struct font_name **fonts;       struct font_name **fonts;
6126  {  {
6127    int nfonts = 0;    int nfonts = 0;
# Line 6196  choose_face_font (f, attrs, font_spec) Line 6194  choose_face_font (f, attrs, font_spec)
6194       Lisp_Object *attrs;       Lisp_Object *attrs;
6195       Lisp_Object font_spec;       Lisp_Object font_spec;
6196  {  {
   Lisp_Object val;  
6197    Lisp_Object pattern, family, adstyle, registry;    Lisp_Object pattern, family, adstyle, registry;
   Lisp_Object new_attrs[LFACE_VECTOR_SIZE];  
6198    char *font_name = NULL;    char *font_name = NULL;
6199    struct font_name *fonts;    struct font_name *fonts;
6200    int nfonts;    int nfonts;

Legend:
Removed from v.1.250.2.4  
changed lines
  Added in v.1.250.2.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26