From 3b73087ec0836d6c483818c8d4bea4385aec2c03 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Thu, 9 Nov 2000 23:47:28 +0000 Subject: [PATCH] (command-line): Set the default tooltip-mode to t for graphical displays which implement x-show-tip. --- lisp/startup.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/lisp/startup.el b/lisp/startup.el index 1c0f9814cf1..8cc24039b12 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -765,6 +765,12 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." (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)) -- 2.39.5