diff options
author | Glenn Morris <rgm@gnu.org> | 2013-09-17 21:57:25 -0700 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2013-09-17 21:57:25 -0700 |
commit | 0a9600e02887b2d9b581ae9ae8f2ecba69a973b5 (patch) | |
tree | 91ab9c858a0a6ba7625e163ce76ac3be79e85f55 /lisp/cedet/semantic/complete.el | |
parent | 3a5fdd45c40d64d231e64cc26302af9428e9f4e4 (diff) | |
download | emacs-0a9600e02887b2d9b581ae9ae8f2ecba69a973b5.tar.gz emacs-0a9600e02887b2d9b581ae9ae8f2ecba69a973b5.tar.bz2 emacs-0a9600e02887b2d9b581ae9ae8f2ecba69a973b5.zip |
* semantic/complete.el (tooltip-mode, tooltip-frame-parameters, tooltip-show):
Declare.
Diffstat (limited to 'lisp/cedet/semantic/complete.el')
-rw-r--r-- | lisp/cedet/semantic/complete.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/cedet/semantic/complete.el b/lisp/cedet/semantic/complete.el index b42e24fb9c0..9af890fb6eb 100644 --- a/lisp/cedet/semantic/complete.el +++ b/lisp/cedet/semantic/complete.el @@ -1634,6 +1634,8 @@ Display mechanism using tooltip for a list of possible completions.") (error nil)) ) +(defvar tooltip-mode) + (defmethod semantic-displayor-show-request ((obj semantic-displayor-tooltip)) "A request to show the current tags table." (if (or (not (featurep 'tooltip)) (not tooltip-mode)) @@ -1726,6 +1728,9 @@ Return a cons cell (X . Y)" (+ (cdr point-pix-pos) (cadr edges) top)))) +(defvar tooltip-frame-parameters) +(declare-function tooltip-show "tooltip" (text &optional use-echo-area)) + (defun semantic-displayor-tooltip-show (text) "Display a tooltip with TEXT near cursor." (let ((point-pix-pos (semantic-displayor-point-position)) |