procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(comint-dynamic-list-completions): Sort COMPLETIONS before first use.

Browse source
This commit is contained in:
Miles Bader 2002-07-08 08:45:12 +00:00
parent 4c02ca4625
commit 66f12dcd3c
2 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2002-07-08 Miles Bader <miles@gnu.org>
* comint.el (comint-dynamic-list-completions): Sort COMPLETIONS
before first use.
2002-07-08 Kim F. Storm <storm@cua.dk>
* files.el (after-find-file): Don't check for read-only status

3
lisp/comint.el
View file

@ -2807,6 +2807,7 @@ See also `comint-dynamic-complete-filename'."
"List in help buffer sorted COMPLETIONS.
Typing SPC flushes the help buffer."
(let ((window (get-buffer-window "*Completions*")))
(setq completions (sort completions 'string-lessp))
(if (and (eq last-command this-command)
window (window-live-p window) (window-buffer window)
(buffer-name (window-buffer window))
@ -2833,7 +2834,7 @@ Typing SPC flushes the help buffer."
(let ((conf (current-window-configuration)))
(with-output-to-temp-buffer "*Completions*"
(display-completion-list (sort completions 'string-lessp)))
(display-completion-list completions))
(message "Type space to flush; repeat completion command to scroll")
(let (key first)
(if (save-excursion