]> git.eshelyaron.com Git - emacs.git/commitdiff
(redisplay_preserve_echo_area): Flush display in case
authorKim F. Storm <storm@cua.dk>
Tue, 12 Oct 2004 14:14:35 +0000 (14:14 +0000)
committerKim F. Storm <storm@cua.dk>
Tue, 12 Oct 2004 14:14:35 +0000 (14:14 +0000)
caller, such as call-process, is not going to poll for input.
(calc_line_height_property): Handle case where it->object is nil.

src/xdisp.c

index 1c479aee4e8f61944cb0074ffeea2cf664e85d42..fa4ddc3eb4dafb7ce246bad65b32823170f4e013 100644 (file)
@@ -10407,6 +10407,9 @@ redisplay_preserve_echo_area (from_where)
     }
   else
     redisplay_internal (1);
+
+  if (rif->flush_display_optional)
+    rif->flush_display_optional (NULL);
 }
 
 
@@ -18696,8 +18699,10 @@ calc_line_height_property (it, prop, font, boff, total)
 
   if (STRINGP (it->object))
     position = make_number (IT_STRING_CHARPOS (*it));
-  else
+  else if (BUFFERP (it->object))
     position = make_number (IT_CHARPOS (*it));
+  else
+    return Qnil;
 
   val = Fget_char_property (position, prop, it->object);