diff options
| author | Chong Yidong | 2008-08-15 00:06:12 +0000 |
|---|---|---|
| committer | Chong Yidong | 2008-08-15 00:06:12 +0000 |
| commit | b6bb817d396008f697a19e44c92b80fa8f0e445c (patch) | |
| tree | de977aedc7834e8398b47ccb97cc1e5bc54adb99 | |
| parent | 7ce8dff29ae50c20982ffa2d15f0da9a7714229e (diff) | |
| download | emacs-b6bb817d396008f697a19e44c92b80fa8f0e445c.tar.gz emacs-b6bb817d396008f697a19e44c92b80fa8f0e445c.zip | |
Revert last change.
| -rw-r--r-- | lisp/emacs-lisp/lisp.el | 4 |
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))) |