/[emacs]/emacs/lisp/tooltip.el
ViewVC logotype

Diff of /emacs/lisp/tooltip.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.61 by teirllm, Sun Jul 10 16:40:11 2005 UTC revision 1.62 by teirllm, Tue Jul 12 20:14:40 2005 UTC
# Line 159  This might return nil if the event did n Line 159  This might return nil if the event did n
159    "Toggle Tooltip display.    "Toggle Tooltip display.
160  With ARG, turn tooltip mode on if and only if ARG is positive."  With ARG, turn tooltip mode on if and only if ARG is positive."
161    :global t    :global t
162      ;; If you change the :init-value below, you also need to change the
163      ;; corresponding code in startup.el.
164    :init-value (not (or noninteractive    :init-value (not (or noninteractive
165                         emacs-quick-startup                         (and (boundp 'emacs-quick-startup) emacs-quick-startup)
166                         (not (display-graphic-p))                         (not (and (fboundp 'display-graphic-p)
167                                     (display-graphic-p)))
168                         (not (fboundp 'x-show-tip))))                         (not (fboundp 'x-show-tip))))
   :initialize 'custom-initialize-safe-default  
169    :group 'tooltip    :group 'tooltip
170    (unless (or (null tooltip-mode) (fboundp 'x-show-tip))    (unless (or (null tooltip-mode) (fboundp 'x-show-tip))
171      (error "Sorry, tooltips are not yet available on this system"))      (error "Sorry, tooltips are not yet available on this system"))

Legend:
Removed from v.1.61  
changed lines
  Added in v.1.62

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26