(lazy-completion-table): Fix debug spec.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3f46d81971e99ad6fbdc01f2b91b0d21ad5d3e5d..9dd9bbd6df0b94290dcc7490d08b76cc8947000f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-04-11  Johan Bockgård  <bojohan@gnu.org>
+
+       * minibuffer.el (lazy-completion-table): Fix debug spec.
+
 2008-04-11  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * minibuffer.el (complete-with-action, lazy-completion-table):

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index 9392885a61e7dbe2a0463f9cb80b0868246e6c64..26cbfc127910908694017d943858ddb7901d1351 100644 (file)
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -80,7 +80,7 @@ from which the minibuffer was entered.  The return value of
 `lazy-completion-table' must be used to initialize the value of VAR.
 
 You should give VAR a non-nil `risky-local-variable' property."
-  (declare (debug (symbol lambda-expr)))
+  (declare (debug (symbolp lambda-expr)))
   (let ((str (make-symbol "string")))
     `(completion-table-dynamic
       (lambda (,str)