[Emacs-diffs] trunk r114367: * semantic/complete.el (tooltip-mode, tooltip-frame-parameters, tooltip-show):

[Glenn Morris]

------------------------------------------------------------
revno: 114367
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Tue 2013-09-17 21:57:25 -0700
message:
  * semantic/complete.el (tooltip-mode, tooltip-frame-parameters, tooltip-show):
  Declare.
modified:
  lisp/cedet/ChangeLog           changelog-20100919015713-3rbr456yray5m84f-1
  lisp/cedet/semantic/complete.el 
complete.el-20091113204419-o5vbwnq5f7feedwu-11255

=== modified file 'lisp/cedet/ChangeLog'
--- a/lisp/cedet/ChangeLog      2013-09-17 15:50:33 +0000
+++ b/lisp/cedet/ChangeLog      2013-09-18 04:57:25 +0000
@@ -1,3 +1,8 @@
+2013-09-18  Glenn Morris  <address@hidden>
+
+       * semantic/complete.el (tooltip-mode, tooltip-frame-parameters)
+       (tooltip-show): Declare.
+
 2013-09-17  Stefan Monnier  <address@hidden>
 
        * semantic/symref/list.el (semantic-symref-results-mode):

=== modified file 'lisp/cedet/semantic/complete.el'
--- a/lisp/cedet/semantic/complete.el   2013-06-02 13:33:09 +0000
+++ b/lisp/cedet/semantic/complete.el   2013-09-18 04:57:25 +0000
@@ -1634,6 +1634,8 @@
     (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 @@
           (+ (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))