{":relief", IMAGE_INTEGER_VALUE, 0},
{":conversion", IMAGE_DONT_CHECK_VALUE_TYPE, 0},
{":heuristic-mask", IMAGE_DONT_CHECK_VALUE_TYPE, 0},
- {":mask", IMAGE_DONT_CHECK_VALUE_TYPE, 0}
+ {":mask", IMAGE_DONT_CHECK_VALUE_TYPE, 0},
{":background", IMAGE_STRING_OR_NIL_VALUE, 0}
};
Lisp_Object specified_bg
= image_spec_value (img->spec, QCbackground, NULL);
- if (! NILP (specified_bg))
+ if (STRINGP (specified_bg))
/* The user specified `:background', use that. */
{
XColor color;
- if (x_defined_color (f, specified_bg, &color, 0))
+ if (x_defined_color (f, XSTRING (specified_bg)->data, &color, 0))
{
png_color_16 user_bg;
png_color_16 *bg;
if (png_get_bKGD (png_ptr, info_ptr, &bg))
{
- img->background = lookup_rgb_color (f, bg.red, bg.green, bg.blue);
+ img->background = lookup_rgb_color (f, bg->red, bg->green, bg->blue);
img->background_valid = 1;
}
}
{":conversion", IMAGE_DONT_CHECK_VALUE_TYPE, 0},
{":heuristic-mask", IMAGE_DONT_CHECK_VALUE_TYPE, 0},
{":mask", IMAGE_DONT_CHECK_VALUE_TYPE, 0},
- {":image", IMAGE_NON_NEGATIVE_INTEGER_VALUE, 0}
+ {":image", IMAGE_NON_NEGATIVE_INTEGER_VALUE, 0},
{":background", IMAGE_STRING_OR_NIL_VALUE, 0}
};