Revert last change.

diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el
index 80bffb33638b94692a6c576964dd1c6c86895536..cee2b828b6c41d0387894a12b79ff6d0024ec12f 100644 (file)
--- a/lisp/emacs-lisp/lisp.el
+++ b/lisp/emacs-lisp/lisp.el
@@ -697,9 +697,7 @@ considered."
                       (setq list (nreverse new))))
                   (if (> (length list) 1)
                       (with-output-to-temp-buffer "*Completions*"
-                        (display-completion-list
-                         list pattern
-                         (- beg (field-beginning))))
+                        (display-completion-list list pattern))
                     ;; Don't leave around a completions buffer that's
                     ;; out of date.
                     (let ((win (get-buffer-window "*Completions*" 0)))