diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-10-12 18:00:00 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-10-12 18:00:00 +0000 |
| commit | 19c716a71ba3659700c95481f5c5f7afb86d53c2 (patch) | |
| tree | cd4c84d7b6dcc92fa660d13d79002d1f24fdc9b7 /src/window.c | |
| parent | faac3f1e1fc59b289099fae2604f0bc6010a74f7 (diff) | |
| download | emacs-19c716a71ba3659700c95481f5c5f7afb86d53c2.tar.gz | |
(Fdelete_other_windows): Set w->force_start.
Diffstat (limited to 'src/window.c')
| -rw-r--r-- | src/window.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/window.c b/src/window.c index 2b3e88b55d6..2896c2224b3 100644 --- a/src/window.c +++ b/src/window.c @@ -1543,6 +1543,9 @@ value is reasonable when this function is called.") w->start_at_line_beg = ((pos.bufpos == BEGV || FETCH_CHAR (pos.bufpos - 1) == '\n') ? Qt : Qnil); + /* We need to do this, so that the window-scroll-functions + get called. */ + w->force_start = Qt; set_buffer_internal (obuf); } @@ -2548,7 +2551,7 @@ window_scroll (window, n, noerror) Lisp_Object bolp, nmoved; /* Always set force_start so that redisplay_window will run - thw window-start-functions. */ + thw window-scroll-functions. */ w->force_start = Qt; XSETFASTINT (tem, PT); |