Rename lookup-words to ispell-lookup-words

(ispell-complete-word, ispell-command-loop): All uses changed.

* cedet/semantic/texi.el (semantic-analyze-possible-completions): Use
ispell-lookup-words instead.

Fixes: debbugs:15460

2 files changed, 7 insertions, 2 deletions

diff --git a/lisp/cedet/ChangeLog b/lisp/cedet/ChangeLog
index ed3301510f0..4a017644c84 100644
--- a/lisp/cedet/ChangeLog
+++ b/lisp/cedet/ChangeLog
@@ -1,3 +1,8 @@
+2013-09-28  Leo Liu  <sdl.web@gmail.com>
+
+        * semantic/texi.el (semantic-analyze-possible-completions): Use
+        ispell-lookup-words instead.  (Bug#15460)
+
 2013-09-20  Glenn Morris  <rgm@gnu.org>
 
         * semantic.el (semantic-new-buffer-fcn-was-run, semantic-active-p):
diff --git a/lisp/cedet/semantic/texi.el b/lisp/cedet/semantic/texi.el
index 34a85b8b79b..51105077188 100644
--- a/lisp/cedet/semantic/texi.el
+++ b/lisp/cedet/semantic/texi.el
@@ -32,7 +32,7 @@
 (require 'texinfo)
 
 (defvar ede-minor-mode)
-(declare-function lookup-words "ispell")
+(declare-function ispell-lookup-words "ispell")
 (declare-function ede-current-project "ede")
 
 (defvar semantic-texi-super-regex
@@ -431,7 +431,7 @@ that start with that symbol."
           ((member 'word (oref context :prefixclass))
            ;; Do completion for words via ispell.
            (require 'ispell)
-           (let ((word-list (lookup-words prefix)))
+           (let ((word-list (ispell-lookup-words prefix)))
              (mapcar (lambda (f) (semantic-tag f 'word)) word-list))
            )
           (t nil))