comparison src/w32font.c @ 110989:36726f009542

Fix handling of font properties on Windows (bug#6303). * src/font.c (font_filter_properties): New function, refactored from ftfont_filter_properties. * src/font.h (font_filter_properties): Declare. * src/ftfont.c (ftfont_filter_properties): Use font_filter_properties. * src/w32font.c (w32font_booleans, w32font_non_booleans): New variables. (w32font_filter_properties): New function. (w32font_driver): Add w32font_filter_properties.

110988:3c6608402b1e

    return Qnil;

  return DECODE_SYSTEM (build_string (buf));
}

struct font_driver w32font_driver =
  {
    0, /* Qgdi */
    0, /* case insensitive */
    w32font_get_cache,

    NULL, /* start_for_frame */
    NULL, /* end_for_frame */
    NULL, /* shape */
    NULL, /* check */
    NULL, /* get_variation_glyphs */
    NULL, /* filter_properties */
  };


/* Initialize state that does not change between invocations. This is only
   called when Emacs is dumped.  */

110989:36726f009542

    return Qnil;

  return DECODE_SYSTEM (build_string (buf));
}

static const char *w32font_booleans [] = {
  NULL,
};

static const char *w32font_non_booleans [] = {
  ":script",
  ":antialias",
  ":style",
  NULL,
};

static void
w32font_filter_properties (font, alist)
     Lisp_Object font;
     Lisp_Object alist;
{
  font_filter_properties (font, alist, w32font_booleans, w32font_non_booleans);
}

struct font_driver w32font_driver =
  {
    0, /* Qgdi */
    0, /* case insensitive */
    w32font_get_cache,

    NULL, /* start_for_frame */
    NULL, /* end_for_frame */
    NULL, /* shape */
    NULL, /* check */
    NULL, /* get_variation_glyphs */
    w32font_filter_properties,
  };


/* Initialize state that does not change between invocations. This is only
   called when Emacs is dumped.  */