aboutsummaryrefslogtreecommitdiffstats
path: root/src/xterm.c
diff options
context:
space:
mode:
authorStefan Monnier2000-07-05 13:41:00 +0000
committerStefan Monnier2000-07-05 13:41:00 +0000
commitb7e804134a3e947c3decbb0a6b02c092be3427f7 (patch)
treedee5fd374c4bbba0efdfb19f23f874c71ba655ea /src/xterm.c
parent969f7e79eb7dd72f72e34a308ff96e427daacaf4 (diff)
downloademacs-b7e804134a3e947c3decbb0a6b02c092be3427f7.tar.gz
emacs-b7e804134a3e947c3decbb0a6b02c092be3427f7.zip
* xterm.c (note_mode_line_highlight, note_mouse_highlight)
(note_tool_bar_highlight, XTread_socket): * msdos.c (IT_note_mode_line_highlight, IT_note_mouse_highlight) (dos_rawgetc): * w32term.c (note_mode_line_highlight, note_mouse_highlight) (note_tool_bar_highlight, w32_read_socket): Do not gratuitously ignore non-string `help-echo' properties.
Diffstat (limited to 'src/xterm.c')
-rw-r--r--src/xterm.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/xterm.c b/src/xterm.c
index 743c7f8934d..bc13fb98ba2 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -6314,7 +6314,7 @@ note_mode_line_highlight (w, x, mode_line_p)
6314 setting the global variable help_echo to the help string. */ 6314 setting the global variable help_echo to the help string. */
6315 help = Fget_text_property (make_number (glyph->charpos), 6315 help = Fget_text_property (make_number (glyph->charpos),
6316 Qhelp_echo, glyph->object); 6316 Qhelp_echo, glyph->object);
6317 if (STRINGP (help)) 6317 if (!NILP (help))
6318 help_echo = help; 6318 help_echo = help;
6319 6319
6320 /* Change the mouse pointer according to what is under X/Y. */ 6320 /* Change the mouse pointer according to what is under X/Y. */
@@ -6571,11 +6571,11 @@ note_mouse_highlight (f, x, y)
6571 6571
6572 /* Check overlays first. */ 6572 /* Check overlays first. */
6573 help = Qnil; 6573 help = Qnil;
6574 for (i = 0; i < noverlays && !STRINGP (help); ++i) 6574 for (i = 0; i < noverlays && NILP (help); ++i)
6575 help = Foverlay_get (overlay_vec[i], Qhelp_echo); 6575 help = Foverlay_get (overlay_vec[i], Qhelp_echo);
6576 6576
6577 /* Try text properties. */ 6577 /* Try text properties. */
6578 if (!STRINGP (help) 6578 if (NILP (help)
6579 && ((STRINGP (glyph->object) 6579 && ((STRINGP (glyph->object)
6580 && glyph->charpos >= 0 6580 && glyph->charpos >= 0
6581 && glyph->charpos < XSTRING (glyph->object)->size) 6581 && glyph->charpos < XSTRING (glyph->object)->size)
@@ -6585,7 +6585,7 @@ note_mouse_highlight (f, x, y)
6585 help = Fget_text_property (make_number (glyph->charpos), 6585 help = Fget_text_property (make_number (glyph->charpos),
6586 Qhelp_echo, glyph->object); 6586 Qhelp_echo, glyph->object);
6587 6587
6588 if (STRINGP (help)) 6588 if (!NILP (help))
6589 help_echo = help; 6589 help_echo = help;
6590 } 6590 }
6591 6591
@@ -6818,7 +6818,7 @@ note_tool_bar_highlight (f, x, y)
6818 XTread_socket does the rest. */ 6818 XTread_socket does the rest. */
6819 help_echo = (XVECTOR (f->current_tool_bar_items) 6819 help_echo = (XVECTOR (f->current_tool_bar_items)
6820 ->contents[prop_idx + TOOL_BAR_ITEM_HELP]); 6820 ->contents[prop_idx + TOOL_BAR_ITEM_HELP]);
6821 if (!STRINGP (help_echo)) 6821 if (NILP (help_echo))
6822 help_echo = (XVECTOR (f->current_tool_bar_items) 6822 help_echo = (XVECTOR (f->current_tool_bar_items)
6823 ->contents[prop_idx + TOOL_BAR_ITEM_CAPTION]); 6823 ->contents[prop_idx + TOOL_BAR_ITEM_CAPTION]);
6824} 6824}
@@ -9773,8 +9773,8 @@ XTread_socket (sd, bufp, numchars, expected)
9773 9773
9774 /* If the contents of the global variable help_echo 9774 /* If the contents of the global variable help_echo
9775 has changed, generate a HELP_EVENT. */ 9775 has changed, generate a HELP_EVENT. */
9776 if (STRINGP (help_echo) 9776 if (!NILP (help_echo)
9777 || STRINGP (previous_help_echo)) 9777 || !NILP (previous_help_echo))
9778 { 9778 {
9779 Lisp_Object frame; 9779 Lisp_Object frame;
9780 9780