Commit 5a41ab94 authored by Richard M. Stallman's avatar Richard M. Stallman

(Fset_window_buffer): Clear window_end_{pos,valid}.

parent 4c7f5b00
...@@ -480,9 +480,13 @@ DEFUN ("window-end", Fwindow_end, Swindow_end, 0, 1, 0, ...@@ -480,9 +480,13 @@ DEFUN ("window-end", Fwindow_end, Swindow_end, 0, 1, 0,
{ {
Lisp_Object value; Lisp_Object value;
struct window *w = decode_window (window); struct window *w = decode_window (window);
Lisp_Object buf;
buf = w->buffer;
CHECK_BUFFER (buf, 0);
XSET (value, Lisp_Int, XSET (value, Lisp_Int,
BUF_Z (current_buffer) - XFASTINT (w->window_end_pos)); BUF_Z (XBUFFER (buf)) - XFASTINT (w->window_end_pos));
return value; return value;
} }
...@@ -1575,6 +1579,8 @@ BUFFER can be a buffer or buffer name.") ...@@ -1575,6 +1579,8 @@ BUFFER can be a buffer or buffer name.")
} }
w->buffer = buffer; w->buffer = buffer;
w->window_end_pos = 0;
w->window_end_valid = Qnil;
w->hscroll = 0; w->hscroll = 0;
Fset_marker (w->pointm, Fset_marker (w->pointm,
make_number (BUF_PT (XBUFFER (buffer))), make_number (BUF_PT (XBUFFER (buffer))),
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment