(syms_of_xdisp) <redisplay-end-trigger-functions>: Defvar it.

diff --git a/src/ChangeLog b/src/ChangeLog
index ef08e1e2f661da364cb7057ad7decda07bc98e28..d4df75405832544d3e4c81ba3901c070d5e34ad2 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2005-07-30  Juanma Barranquero  <lekktu@gmail.com>
+
+       * xdisp.c (syms_of_xdisp) <redisplay-end-trigger-functions>:
+       Defvar it.
+
 2005-07-28  Juanma Barranquero  <lekktu@gmail.com>
 
        * w32fns.c (my_set_window_pos, my_show_window): Don't declare.

diff --git a/src/xdisp.c b/src/xdisp.c
index 09cf8a7f5de989a9d1bac7998aebe743fe5ade99..d7de7dbe8262baa8219cce6ea48a058371c3b923 100644 (file)
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -231,7 +231,7 @@ extern Lisp_Object Qhelp_echo;
 
 Lisp_Object Qoverriding_local_map, Qoverriding_terminal_local_map;
 Lisp_Object Qwindow_scroll_functions, Vwindow_scroll_functions;
-Lisp_Object Qredisplay_end_trigger_functions;
+Lisp_Object Qredisplay_end_trigger_functions, Vredisplay_end_trigger_functions;
 Lisp_Object Qinhibit_point_motion_hooks;
 Lisp_Object QCeval, QCfile, QCdata, QCpropertize;
 Lisp_Object Qfontified;
@@ -23136,6 +23136,12 @@ and its new display-start position.  Note that the value of `window-end'
 is not valid when these functions are called.  */);
   Vwindow_scroll_functions = Qnil;
 
+  DEFVAR_LISP ("redisplay-end-trigger-functions", &Vredisplay_end_trigger_functions,
+    doc: /* Functions called when redisplay of a window reaches the end trigger.
+Each function is called with two arguments, the window and the end trigger value.
+See `set-window-redisplay-end-trigger'.  */);
+  Vredisplay_end_trigger_functions = Qnil;
+
   DEFVAR_BOOL ("mouse-autoselect-window", &mouse_autoselect_window,
     doc: /* *Non-nil means autoselect window with mouse pointer.  */);
   mouse_autoselect_window = 0;