Mercurial > emacs

changeset 61565:19480ce3528d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tooltip-mode): Specify correct standard value for Custom in init-value.
author Luc Teirlinck <teirllm@auburn.edu>
date Sat, 16 Apr 2005 00:21:56 +0000
parents 2e1a9a226cee
children 9e1e4bffa450
files lisp/tooltip.el
diffstat 1 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- 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"))