Mercurial > emacs
changeset 4102:dba3acd9972c
(Fdisplay_completion_list): Run completion-setup-hook.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 15 Jul 1993 05:46:02 +0000 |
| parents | e7f74dc81c7f |
| children | 25a49899f199 |
| files | src/minibuf.c |
| diffstat | 1 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/minibuf.c Thu Jul 15 05:40:01 1993 +0000 +++ b/src/minibuf.c Thu Jul 15 05:46:02 1993 +0000 @@ -1249,7 +1249,8 @@ set_buffer_internal (XBUFFER (Vstandard_output)); if (NILP (completions)) - write_string ("There are no possible completions of what you have typed.", -1); + write_string ("There are no possible completions of what you have typed.", + -1); else { write_string ("Possible completions are:", -1); @@ -1305,6 +1306,9 @@ } } + if (!NILP (Vrun_hooks)) + call1 (Vrun_hooks, intern ("completion-setup-hook")); + if (XTYPE (Vstandard_output) == Lisp_Buffer) set_buffer_internal (old); return Qnil;