master 4a4fcf628e: Fix reference to 'x-max-tooltip-size' in complete.el

[Eli Zaretskii]

branch: master
commit 4a4fcf628e1e4c8db47cd62fa5617b662fa8b5d6
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    Fix reference to 'x-max-tooltip-size' in complete.el
    
    * lisp/cedet/semantic/complete.el: Don't assume that
    x-max-tooltip-size is a cons cell.
---
 lisp/cedet/semantic/complete.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/cedet/semantic/complete.el b/lisp/cedet/semantic/complete.el
index 6a09adca32..cd04cf8643 100644
--- a/lisp/cedet/semantic/complete.el
+++ b/lisp/cedet/semantic/complete.el
@@ -1638,8 +1638,10 @@ This will not happen if you directly set this variable 
via `setq'."
   :set (lambda (sym var)
          (set-default sym var)
          (when (boundp 'x-max-tooltip-size)
-           (setcdr x-max-tooltip-size (max (1+ var) (cdr 
x-max-tooltip-size))))))
-
+           (if (not (consp x-max-tooltip-size))
+               (setq x-max-tooltip-size '(80 . 40)))
+           (setcdr x-max-tooltip-size
+                   (max (1+ var) (cdr x-max-tooltip-size))))))
 
 (defclass semantic-displayer-tooltip (semantic-displayer-traditional)
   ((mode :initarg :mode