Mercurial > emacs
changeset 13584:3daf8244546e
(Qredisplay_end_trigger_functions): Renamed from ..._hook.
(syms_of_xdisp): Set up new name.
(display_text_line): Call them with arguments.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 18 Nov 1995 16:21:19 +0000 |
| parents | 8ee401a7aeec |
| children | dc00b7be6593 |
| files | src/xdisp.c |
| diffstat | 1 files changed, 10 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xdisp.c Sat Nov 18 16:00:22 1995 +0000 +++ b/src/xdisp.c Sat Nov 18 16:21:19 1995 +0000 @@ -50,7 +50,7 @@ Lisp_Object Qoverriding_local_map, Qoverriding_terminal_local_map; Lisp_Object Qwindow_scroll_functions, Vwindow_scroll_functions; -Lisp_Object Qredisplay_end_trigger_hook; +Lisp_Object Qredisplay_end_trigger_functions; /* Nonzero means print newline to stdout before next minibuffer message. */ @@ -2725,7 +2725,13 @@ run the hook. */ if (pos >= e_t_h && e_t_h != ZV) { - Frun_hooks (1, &Qredisplay_end_trigger_hook); + Lisp_Object args[3]; + + args[0] = Qredisplay_end_trigger_functions; + XSETWINDOW (args[1], w); + XSETINT (args[2], e_t_h); + Frun_hook_with_args (3, args); + w->redisplay_end_trigger = Qnil; e_t_h = ZV; /* Notice if it changed the face of this character. */ @@ -4257,8 +4263,8 @@ staticpro (&Qwindow_scroll_functions); Qwindow_scroll_functions = intern ("window-scroll-functions"); - staticpro (&Qredisplay_end_trigger_hook); - Qredisplay_end_trigger_hook = intern ("redisplay-end-trigger-hook"); + staticpro (&Qredisplay_end_trigger_functions); + Qredisplay_end_trigger_functions = intern ("redisplay-end-trigger-functions"); staticpro (&last_arrow_position); staticpro (&last_arrow_string);