changeset 30369:cf4163d1218e

(note_mouse_highlight): If help-echo was found in an overlay, use that overlay as the object in which the help was found.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 21 Jul 2000 15:38:03 +0000
parents 7867dcfece5f
children e39d4add1859
files src/xterm.c
diffstat 1 files changed, 6 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/xterm.c	Fri Jul 21 15:37:33 2000 +0000
+++ b/src/xterm.c	Fri Jul 21 15:38:03 2000 +0000
@@ -6626,18 +6626,21 @@
 
 	/* Look for a `help-echo' property.  */
 	{
-	  Lisp_Object help, object, position;
+	  Lisp_Object help, overlay;
 
 	  /* Check overlays first.  */
 	  help = Qnil;
 	  for (i = 0; i < noverlays && NILP (help); ++i)
-	    help = Foverlay_get (overlay_vec[i], Qhelp_echo);
+	    {
+	      overlay = overlay_vec[i];
+	      help = Foverlay_get (overlay, Qhelp_echo);
+	    }
 
 	  if (!NILP (help))
 	    {
 	      help_echo = help;
 	      help_echo_window = window;
-	      help_echo_object = w->buffer;
+	      help_echo_object = overlay;
 	      help_echo_pos = pos;
 	    }
 	  else