* minibuffer.el (completion-all-sorted-completions): Make args

optional as they are.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7b69330083d72c67bf6b38546237887b88684046..cf450c55612ff2d0050e337169fc590ff0464f7a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-09-26  Leo Liu  <sdl.web@gmail.com>
+
+       * minibuffer.el (completion-all-sorted-completions): Make args
+       optional as they are.
+
 2013-09-25  Daniel Colascione  <dancol@dancol.org>
 
        * emacs-lisp/cl-macs.el (cl-type-spec): Tell edebug what type

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index ab54b9da1386ca31830fe633c3aab3308ffff04d..e588964a65bb14d3e79df2c888e2a778de0aea34 100644 (file)
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -1100,7 +1100,7 @@ scroll the window of possible completions."
     (if (eq (car bounds) base) md-at-point
       (completion-metadata (substring string 0 base) table pred))))
 
-(defun completion-all-sorted-completions (start end)
+(defun completion-all-sorted-completions (&optional start end)
   (or completion-all-sorted-completions
       (let* ((start (or start (minibuffer-prompt-end)))
              (end (or end (point-max)))