717 |
(if tempo-leave-completion-buffer |
(if tempo-leave-completion-buffer |
718 |
(with-output-to-temp-buffer "*Completions*" |
(with-output-to-temp-buffer "*Completions*" |
719 |
(display-completion-list |
(display-completion-list |
720 |
(all-completions string tag-list))) |
(all-completions string tag-list) |
721 |
|
string)) |
722 |
(save-window-excursion |
(save-window-excursion |
723 |
(with-output-to-temp-buffer "*Completions*" |
(with-output-to-temp-buffer "*Completions*" |
724 |
(display-completion-list |
(display-completion-list |
725 |
(all-completions string tag-list))) |
(all-completions string tag-list) |
726 |
|
string)) |
727 |
(sit-for 32767)))) |
(sit-for 32767)))) |
728 |
|
|
729 |
;;; |
;;; |