mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

Fix bug #17331 with display properties on help-echo strings.

Browse source 
lisp/tooltip.el (tooltip-show-help-non-mode, tooltip-show-help): Use
 equal-including-properties to compare help-echo strings.
This commit is contained in:
Eli Zaretskii 2014-04-24 18:02:56 +03:00
parent c0b9bc72cc
commit bc0650fdb6
2 changed files with 9 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2014-04-24 Eli Zaretskii <eliz@gnu.org>
* tooltip.el (tooltip-show-help-non-mode, tooltip-show-help): Use
equal-including-properties to compare help-echo strings. (Bug#17331)
2014-04-24 Leo Liu <sdl.web@gmail.com>
* emacs-lisp/lisp-mode.el (emacs-lisp-mode-syntax-table):

8
lisp/tooltip.el
View file

@ -343,10 +343,10 @@ It is also called if Tooltip mode is on, for text-only displays."
((stringp help)
(setq help (replace-regexp-in-string "\n" ", " help))
(unless (or tooltip-previous-message
(string-equal help (current-message))
(equal-including-properties help (current-message))
(and (stringp tooltip-help-message)
(string-equal tooltip-help-message
(current-message))))
(equal-including-properties tooltip-help-message
(current-message))))
(setq tooltip-previous-message (current-message)))
(setq tooltip-help-message help)
(let ((message-truncate-lines t)
@ -369,7 +369,7 @@ MSG is either a help string to display, or nil to cancel the display."
;; Cancel display. This also cancels a delayed tip, if
;; there is one.
(tooltip-hide))
((equal previous-help msg)
((equal-including-properties previous-help msg)
;; Same help as before (but possibly the mouse has moved).
;; Keep what we have.
)