509 |
(message "Making completion list...") |
(message "Making completion list...") |
510 |
(let ((list (all-completions symbol list nil))) |
(let ((list (all-completions symbol list nil))) |
511 |
(with-output-to-temp-buffer "*Completions*" |
(with-output-to-temp-buffer "*Completions*" |
512 |
(display-completion-list list))) |
(display-completion-list list symbol))) |
513 |
(message "Making completion list... done")))) |
(message "Making completion list... done")))) |
514 |
(funcall (nth 1 entry))))) |
(funcall (nth 1 entry))))) |
515 |
|
|