diff options
| author | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> | 2005-04-18 07:43:59 +0000 |
|---|---|---|
| committer | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> | 2005-04-18 07:43:59 +0000 |
| commit | 8b8f03c80cf2ad0a17952bfcc82839601cd624f8 (patch) | |
| tree | bf277e0c24b7a928aefe245c74a7dcb8ae49738f /lisp/tooltip.el | |
| parent | d4127a9a1111805640eaa06e9767a7a6f56351a5 (diff) | |
| download | emacs-8b8f03c80cf2ad0a17952bfcc82839601cd624f8.tar.gz | |
(tooltip-mode): `emacs-quick-startup' and `display-graphic-p' may not
be bound yet.
Diffstat (limited to 'lisp/tooltip.el')
| -rw-r--r-- | lisp/tooltip.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/tooltip.el b/lisp/tooltip.el index c903dbac523..89a72d570a2 100644 --- a/lisp/tooltip.el +++ b/lisp/tooltip.el @@ -188,8 +188,9 @@ With ARG, turn tooltip mode on if and only if ARG is positive." ;; 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)) + (and (boundp 'emacs-quick-startup) emacs-quick-startup) + (not (and (fboundp 'display-graphic-p) + (display-graphic-p))) (not (fboundp 'x-show-tip)))) :group 'tooltip (unless (or (null tooltip-mode) (fboundp 'x-show-tip)) |