# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 973813648 0
# Node ID 4161fec906e03b7f045432a5f5ff39757196b9a9
# Parent  516e70b9fc74cbd81e9f2a69b72cee7c28c0ef03
(command-line): Set the default tooltip-mode
to t for graphical displays which implement x-show-tip.

diff -r 516e70b9fc74 -r 4161fec906e0 lisp/startup.el
--- a/lisp/startup.el	Thu Nov 09 23:05:07 2000 +0000
+++ b/lisp/startup.el	Thu Nov 09 23:47:28 2000 +0000
@@ -765,6 +765,12 @@
     (setq-default blink-cursor t)
     (blink-cursor-mode 1))
 
+  (when (and (not noninteractive)
+	     (display-graphic-p)
+	     (fboundp 'x-show-tip))
+    (setq-default tooltip-mode t)
+    (tooltip-mode 1))
+
   ;; Register default TTY colors for the case the terminal hasn't a
   ;; terminal init file.
   (or (memq window-system '(x w32))