aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2008-08-15 00:06:12 +0000
committerChong Yidong2008-08-15 00:06:12 +0000
commitb6bb817d396008f697a19e44c92b80fa8f0e445c (patch)
treede977aedc7834e8398b47ccb97cc1e5bc54adb99
parent7ce8dff29ae50c20982ffa2d15f0da9a7714229e (diff)
downloademacs-b6bb817d396008f697a19e44c92b80fa8f0e445c.tar.gz
emacs-b6bb817d396008f697a19e44c92b80fa8f0e445c.zip
Revert last change.
-rw-r--r--lisp/emacs-lisp/lisp.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el
index 80bffb33638..cee2b828b6c 100644
--- a/lisp/emacs-lisp/lisp.el
+++ b/lisp/emacs-lisp/lisp.el
@@ -697,9 +697,7 @@ considered."
697 (setq list (nreverse new)))) 697 (setq list (nreverse new))))
698 (if (> (length list) 1) 698 (if (> (length list) 1)
699 (with-output-to-temp-buffer "*Completions*" 699 (with-output-to-temp-buffer "*Completions*"
700 (display-completion-list 700 (display-completion-list list pattern))
701 list pattern
702 (- beg (field-beginning))))
703 ;; Don't leave around a completions buffer that's 701 ;; Don't leave around a completions buffer that's
704 ;; out of date. 702 ;; out of date.
705 (let ((win (get-buffer-window "*Completions*" 0))) 703 (let ((win (get-buffer-window "*Completions*" 0)))