diff lisp/emacs-lisp/lisp.el @ 97477:bcaacb72ee0e

Revert last change.
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 15 Aug 2008 00:06:12 +0000
parents b7077a582a3d
children 42c2049ff2f6
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp.el	Thu Aug 14 23:44:41 2008 +0000
+++ b/lisp/emacs-lisp/lisp.el	Fri Aug 15 00:06:12 2008 +0000
@@ -697,9 +697,7 @@
 		       (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)))