Fix Imenu regression.

[gnu-emacs] / src / fontset.c

diff --git a/src/fontset.c b/src/fontset.c
index da745b31ca1ca4c49259222540320c03622e3ccd..ed468d33a15887861e24ccd97af84bec97cfd0c5 100644 (file)
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -1879,6 +1879,8 @@ DEFUN ("internal-char-font", Finternal_char_font, Sinternal_char_font, 1, 2, 0,
     }
   if (! CHAR_VALID_P (c))
     return Qnil;
+  if (!FRAME_WINDOW_P (f))
+    return Qnil;
   face_id = FACE_FOR_CHAR (f, FACE_FROM_ID (f, face_id), c, pos, Qnil);
   face = FACE_FROM_ID (f, face_id);
   if (face->font)