(minibuffer-default-add-completions):

Remove `(interactive)'.  (Bug#2805)

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d5581dc6464..ebc62924b5e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-03-28  Juri Linkov  <juri@jurta.org>
+
+        * simple.el (minibuffer-default-add-completions):
+        Remove `(interactive)'.  (Bug#2805)
+
 2009-03-28  Eli Zaretskii  <eliz@gnu.org>
 
         * files.el (shell-quote-wildcard-pattern): Doc fix.
diff --git a/lisp/simple.el b/lisp/simple.el
index 999809e6bd8..b7f1fca0f37 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1359,7 +1359,6 @@ this by calling a function defined by `minibuffer-default-add-function'.")
   "Return a list of all completions without the default value.
 This function is used to add all elements of the completion table to
 the end of the list of defaults just after the default value."
-  (interactive)
   (let ((def minibuffer-default)
         (all (all-completions ""
                               minibuffer-completion-table