New branch for lexbind, losing all history.

[bpt/emacs.git] / src / image.c

diff --git a/src/image.c b/src/image.c
index b9620e1..67c228c 100644 (file)
--- a/src/image.c
+++ b/src/image.c
@@ -885,7 +885,7 @@ parse_image_spec (spec, keywords, nkeywords, type)
        case IMAGE_FUNCTION_VALUE:
          value = indirect_function (value);
          if (SUBRP (value)
-             || COMPILEDP (value)
+             || FUNVECP (value)
              || (CONSP (value) && EQ (XCAR (value), Qlambda)))
            break;
          return 0;