diff options
author | Gerd Moellmann <gerd@gnu.org> | 2000-12-18 17:10:50 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2000-12-18 17:10:50 +0000 |
commit | c9026cec2d1063331b908aa9cb03b414e9f9742a (patch) | |
tree | f927e1ec4499ca7d417006b35341fdde5c8e551a /lisp | |
parent | 8e9dfb3ce8065caee69aa9a3819206fc9cf3ad08 (diff) | |
download | emacs-c9026cec2d1063331b908aa9cb03b414e9f9742a.tar.gz |
(tooltip-mode): Signal an error if x-show-tip
isn't fboundp.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/tooltip.el | 2 |
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))) |