Mercurial > emacs

comparison lisp/tooltip.el @ 70099:7ab0f5013dfb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tooltip-mode, tooltip-use-echo-area): Doc fixes.
author Richard M. Stallman <rms@gnu.org>
date Tue, 18 Apr 2006 21:23:12 +0000
parents 3bd95f4f2941
children 1152b12a089e 72dea2ff0142
comparison
equal deleted inserted replaced
70098:bd71e8bcb103 70099:7ab0f5013dfb
45 ;; which does a set-buffer, like the summary buffer of Gnus. Calling 45 ;; which does a set-buffer, like the summary buffer of Gnus. Calling
46 ;; set-buffer prevents redisplay optimizations, so every mouse motion 46 ;; set-buffer prevents redisplay optimizations, so every mouse motion
47 ;; would be accompanied by a full redisplay. 47 ;; would be accompanied by a full redisplay.
48 48
49 (define-minor-mode tooltip-mode 49 (define-minor-mode tooltip-mode
50 "Toggle Tooltip display. 50 "Toggle Tooltip mode.
51 With ARG, turn tooltip mode on if and only if ARG is positive. 51 With ARG, turn Tooltip mode on if and only if ARG is positive.
52 When this minor mode is enabled, Emacs displays help text 52 When this minor mode is enabled, Emacs displays help text
53 in a pop-up window on mouse-over. When it is disabled, 53 in a pop-up window for buttons and menu items that you put the mouse on.
54 Emacs displays the help text in the echo area instead." 54 \(However, if `tooltip-use-echo-area' is non-nil, this and
55 all pop-up help appears in the echo area.)
56
57 When Tooltip mode is disabled, Emacs displays one line of
58 the help text in the echo area, and does not make a pop-up window."
55 :global t 59 :global t
56 :init-value (not (or noninteractive 60 :init-value (not (or noninteractive
57 emacs-basic-display 61 emacs-basic-display
58 (not (display-graphic-p)) 62 (not (display-graphic-p))
59 (not (fboundp 'x-show-tip)))) 63 (not (fboundp 'x-show-tip))))
140 "Face for tooltips." 144 "Face for tooltips."
141 :group 'tooltip 145 :group 'tooltip
142 :group 'basic-faces) 146 :group 'basic-faces)
143 147
144 (defcustom tooltip-use-echo-area nil 148 (defcustom tooltip-use-echo-area nil
145 "Use the echo area instead of tooltip frames for help and GUD tooltips." 149 "Use the echo area instead of tooltip frames for help and GUD tooltips.
150 To display multi-line help text in the echo area, set this to t
151 and enable `tooltip-mode'."
146 :type 'boolean 152 :type 'boolean
147 :group 'tooltip) 153 :group 'tooltip)
148 154
149 155
150 ;;; Variables that are not customizable. 156 ;;; Variables that are not customizable.