# HG changeset patch
# User YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
# Date 1113810239 0
# Node ID 5739226d2d8c254ca21fea703e690671bbf063d2
# Parent  20086071cf3cc9f00443441efa730cd054304471
(tooltip-mode): `emacs-quick-startup' and `display-graphic-p' may not
be bound yet.

diff -r 20086071cf3c -r 5739226d2d8c lisp/tooltip.el
--- a/lisp/tooltip.el	Mon Apr 18 01:20:34 2005 +0000
+++ b/lisp/tooltip.el	Mon Apr 18 07:43:59 2005 +0000
@@ -188,8 +188,9 @@
   ;; 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))