# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 1087353909 0
# Node ID 56c3ef9caeed3194b385b6a065d7c077c0721053
# Parent  0806d31e3c9c5e0bb0890bb35611b7b7b76d575e
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-410

Make sure image types are initialized for lookup too

diff -r 0806d31e3c9c -r 56c3ef9caeed src/ChangeLog
--- a/src/ChangeLog	Wed Jun 16 02:44:20 2004 +0000
+++ b/src/ChangeLog	Wed Jun 16 02:45:09 2004 +0000
@@ -1,3 +1,7 @@
+2004-06-16  Miles Bader  <miles@gnu.org>
+
+	* image.c (lookup_image_type): Initialize image type if necessary.
+
 2004-06-15  Kim F. Storm  <storm@cua.dk>
 
 	* xdisp.c (try_cursor_movement): Exclude header line from scroll
diff -r 0806d31e3c9c -r 56c3ef9caeed src/image.c
--- a/src/image.c	Wed Jun 16 02:44:20 2004 +0000
+++ b/src/image.c	Wed Jun 16 02:45:09 2004 +0000
@@ -689,6 +689,10 @@
 {
   struct image_type *type;
 
+  /* We must initialize the image-type if it hasn't been already.  */
+  if (NILP (Finit_image_library (symbol)))
+    return 0;			/* unimplemented */
+
   for (type = image_types; type; type = type->next)
     if (EQ (symbol, *type->type))
       break;