diff options
| author | Luc Teirlinck <teirllm@auburn.edu> | 2005-04-16 00:21:56 +0000 |
|---|---|---|
| committer | Luc Teirlinck <teirllm@auburn.edu> | 2005-04-16 00:21:56 +0000 |
| commit | d5e2843d274a95d548f5c512f7251dae8f02b94a (patch) | |
| tree | c606a7801b228c98ad7ec9d9f36c16e8ded6c6f2 /lisp/tooltip.el | |
| parent | f6579c71826443f813c6906ecbe117c280dd8fce (diff) | |
| download | emacs-d5e2843d274a95d548f5c512f7251dae8f02b94a.tar.gz | |
(tooltip-mode): Specify correct standard value for Custom in init-value.
Diffstat (limited to 'lisp/tooltip.el')
| -rw-r--r-- | lisp/tooltip.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/tooltip.el b/lisp/tooltip.el index 59f82c12e31..f0620003cd6 100644 --- a/lisp/tooltip.el +++ b/lisp/tooltip.el @@ -187,6 +187,12 @@ This might return nil if the event did not occur over a buffer." "Toggle Tooltip display. With ARG, turn tooltip mode on if and only if ARG is positive." :global t + ;; If you change the :init-value below, you also need to change the + ;; corresponding code in startup.el. + :init-value (not (or noninteractive + emacs-quick-startup + (not (display-graphic-p)) + (not (fboundp 'x-show-tip)))) :group 'tooltip (unless (or (null tooltip-mode) (fboundp 'x-show-tip)) (error "Sorry, tooltips are not yet available on this system")) |