mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-08 04:30:45 -08:00
Code Issues Projects Releases Wiki Activity

(Fset_window_buffer): Fix dedicated window error call.

Browse source 
(window_loop, case UNSHOW_BUFFER): Clear dedicated flag.
This commit is contained in:
Richard M. Stallman 1994-05-18 23:37:55 +00:00
parent 6252195155
commit 3cf855321c
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/window.c
View file

@ -1269,6 +1269,7 @@ window_loop (type, obj, mini, frames)
if (NILP (another_buffer))
another_buffer
= Fget_buffer_create (build_string ("*scratch*"));
XWINDOW (w)->dedicated = Qnil;
Fset_window_buffer (w, another_buffer);
if (EQ (w, selected_window))
Fset_buffer (XWINDOW (w)->buffer);
@ -1626,7 +1627,8 @@ BUFFER can be a buffer or buffer name.")
is first being set up. */
{
if (!NILP (w->dedicated) && !EQ (tem, buffer))
error ("Window is dedicated to %s\n", tem);
error ("Window is dedicated to `%s'",
XSTRING (XBUFFER (tem)->name)->data);
unshow_buffer (w);
}