(gif_load): Use correct width and height for GIF images.

diff --git a/src/ChangeLog b/src/ChangeLog
index ab27f83b46b7011e71d78612060ab1b4940594ba..0c900eacff88c4b8fc3bc709c5b521680ba0e808 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2002-02-20  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
+
+       * xfns.c (gif_load): Use correct width and height for GIF images.
+
 2002-02-19  Eli Zaretskii  <eliz@is.elta.co.il>
 
        * floatfns.c (Fatan): Accept an optional second arg and call

diff --git a/src/xfns.c b/src/xfns.c
index 4611d29aae924c29c285b00c16737b919c333647..b8818b6c5bec0dbfc74ab26da86a1a4e3924086a 100644 (file)
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -10161,8 +10161,8 @@ gif_load (f, img)
       return 0;
     }
 
-  width = img->width = gif->SWidth;
-  height = img->height = gif->SHeight;
+  width = img->width = max (gif->SWidth, gif->Image.Left + gif->Image.Width);
+  height = img->height = max (gif->SHeight, gif->Image.Top + gif->Image.Height);
 
   /* Create the X image and pixmap.  */
   if (!x_create_x_image_and_pixmap (f, width, height, 0, &ximg, &img->pixmap))