aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1993-07-26 19:14:26 +0000
committerRichard M. Stallman1993-07-26 19:14:26 +0000
commit5a41ab94d9b500763b8571973375c2b2202a93cc (patch)
tree865ce5dfdaa0fb07c1134bb0ac04f964be10321e /src
parent4c7f5b007a565991affc9893f60658a5e886ea97 (diff)
downloademacs-5a41ab94d9b500763b8571973375c2b2202a93cc.tar.gz
emacs-5a41ab94d9b500763b8571973375c2b2202a93cc.zip
(Fset_window_buffer): Clear window_end_{pos,valid}.
Diffstat (limited to 'src')
-rw-r--r--src/window.c10
1 files changed, 8 insertions, 2 deletions
diff --git a/src/window.c b/src/window.c
index 89e65de1637..6d346fef410 100644
--- a/src/window.c
+++ b/src/window.c
@@ -480,9 +480,13 @@ DEFUN ("window-end", Fwindow_end, Swindow_end, 0, 1, 0,
480{ 480{
481 Lisp_Object value; 481 Lisp_Object value;
482 struct window *w = decode_window (window); 482 struct window *w = decode_window (window);
483 483 Lisp_Object buf;
484
485 buf = w->buffer;
486 CHECK_BUFFER (buf, 0);
487
484 XSET (value, Lisp_Int, 488 XSET (value, Lisp_Int,
485 BUF_Z (current_buffer) - XFASTINT (w->window_end_pos)); 489 BUF_Z (XBUFFER (buf)) - XFASTINT (w->window_end_pos));
486 490
487 return value; 491 return value;
488} 492}
@@ -1575,6 +1579,8 @@ BUFFER can be a buffer or buffer name.")
1575 } 1579 }
1576 1580
1577 w->buffer = buffer; 1581 w->buffer = buffer;
1582 w->window_end_pos = 0;
1583 w->window_end_valid = Qnil;
1578 w->hscroll = 0; 1584 w->hscroll = 0;
1579 Fset_marker (w->pointm, 1585 Fset_marker (w->pointm,
1580 make_number (BUF_PT (XBUFFER (buffer))), 1586 make_number (BUF_PT (XBUFFER (buffer))),