# HG changeset patch
# User Luc Teirlinck <teirllm@auburn.edu>
# Date 1113610916 0
# Node ID 19480ce3528d259a05989408b26f7aa17f89a3c6
# Parent  2e1a9a226cee51fbdc31122853cd897a909ee356
(tooltip-mode): Specify correct standard value for Custom in init-value.

diff -r 2e1a9a226cee -r 19480ce3528d lisp/tooltip.el
--- a/lisp/tooltip.el	Fri Apr 15 10:35:09 2005 +0000
+++ b/lisp/tooltip.el	Sat Apr 16 00:21:56 2005 +0000
@@ -187,6 +187,12 @@
   "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"))