# HG changeset patch
# User YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
# Date 1145606193 0
# Node ID 37f988f09f67e0769f7a03783e1246685fb1bc30
# Parent  2cd7cafcba54db37662dff249b8d5ffa70327e9e
[MAC_OS] (xpm_load_image): Fill in background field
while we have ximg handy.

diff -r 2cd7cafcba54 -r 37f988f09f67 src/image.c
--- a/src/image.c	Fri Apr 21 05:35:31 2006 +0000
+++ b/src/image.c	Fri Apr 21 07:56:33 2006 +0000
@@ -4460,6 +4460,10 @@
   img->width = width;
   img->height = height;
 
+  /* Maybe fill in the background field while we have ximg handy. */
+  if (NILP (image_spec_value (img->spec, QCbackground, NULL)))
+    IMAGE_BACKGROUND (img, f, ximg);
+
   x_put_x_image (f, ximg, img->pixmap, width, height);
   x_destroy_x_image (ximg);
   if (have_mask)