diff options
author | Stefan Monnier <[email protected]> | 2008-04-09 18:02:08 +0000 |
---|---|---|
committer | Stefan Monnier <[email protected]> | 2008-04-09 18:02:08 +0000 |
commit | c025fb0a25dc97d04f37b6f94ec85bcdaa6d4afa (patch) | |
tree | 84133e559ec86aafe36ff24456f10cb130ebc6e5 /src | |
parent | ed7dabb3365b8474e4377529c72470d1476d6491 (diff) |
(temp_echo_area_glyphs): Remove unused function.
Diffstat (limited to 'src')
-rw-r--r-- | src/ChangeLog | 4 | ||||
-rw-r--r-- | src/minibuf.c | 42 |
2 files changed, 4 insertions, 42 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index fc7b1404a4..893af47ccc 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2008-04-09 Stefan Monnier <[email protected]> + + * minibuf.c (temp_echo_area_glyphs): Remove unused function. + 2008-04-09 Juanma Barranquero <[email protected]> * editfns.c (Ffield_string_no_properties): Fix typo in docstring. diff --git a/src/minibuf.c b/src/minibuf.c index ee6089a244..8cdea645d3 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -2024,48 +2024,6 @@ If no minibuffer is active, return nil. */) } -/* Temporarily display STRING at the end of the current - minibuffer contents. This is used to display things like - "[No Match]" when the user requests a completion for a prefix - that has no possible completions, and other quick, unobtrusive - messages. */ - -extern Lisp_Object Vminibuffer_message_timeout; - -void -temp_echo_area_glyphs (string) - Lisp_Object string; -{ - int osize = ZV; - int osize_byte = ZV_BYTE; - int opoint = PT; - int opoint_byte = PT_BYTE; - Lisp_Object oinhibit; - oinhibit = Vinhibit_quit; - - /* Clear out any old echo-area message to make way for our new thing. */ - message (0); - - SET_PT_BOTH (osize, osize_byte); - insert_from_string (string, 0, 0, SCHARS (string), SBYTES (string), 0); - SET_PT_BOTH (opoint, opoint_byte); - Vinhibit_quit = Qt; - - if (NUMBERP (Vminibuffer_message_timeout)) - sit_for (Vminibuffer_message_timeout, 0, 2); - else - sit_for (Qt, 0, 2); - - del_range_both (osize, osize_byte, ZV, ZV_BYTE, 1); - SET_PT_BOTH (opoint, opoint_byte); - if (!NILP (Vquit_flag)) - { - Vquit_flag = Qnil; - Vunread_command_events = Fcons (make_number (quit_char), Qnil); - } - Vinhibit_quit = oinhibit; -} - void init_minibuf_once () { |