(minibuffer-default-add-completions):

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d5581dc64645c0646296a03057f2fd760b79851d..ebc62924b5ec2aaa1b23554e31447cb5b349c9b7 100644 (file)
--- 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 999809e6bd83457f9f6f46d0ffb55ad44af43c33..b7f1fca0f37b7816a51dd6fbee09939866699a11 100644 (file)
--- 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