diff options
-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 59f82c12e3..f0620003cd 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")) |