summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2000-12-18 17:10:50 +0000
committerGerd Moellmann <gerd@gnu.org>2000-12-18 17:10:50 +0000
commitc9026cec2d1063331b908aa9cb03b414e9f9742a (patch)
treef927e1ec4499ca7d417006b35341fdde5c8e551a /lisp
parent8e9dfb3ce8065caee69aa9a3819206fc9cf3ad08 (diff)
downloademacs-c9026cec2d1063331b908aa9cb03b414e9f9742a.tar.gz
(tooltip-mode): Signal an error if x-show-tip
isn't fboundp.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/tooltip.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/tooltip.el b/lisp/tooltip.el
index dada23d0c2e..e02eec71884 100644
--- a/lisp/tooltip.el
+++ b/lisp/tooltip.el
@@ -197,6 +197,8 @@ This might return nil if the event did not occur over a buffer."
"Mode for tooltip display.
With ARG, turn tooltip mode on if and only if ARG is positive."
(interactive "P")
+ (unless (fboundp 'x-show-tip)
+ (error "Sorry, tooltips are not yet available on this system"))
(let* ((on (if arg
(> (prefix-numeric-value arg) 0)
(not tooltip-mode)))