martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(Fdisplay_buffer): Fix prev change--return selected window.

Browse Source
This commit is contained in:
Richard M. Stallman
1995-03-14 18:39:58 +00:00
parent 3b9f7964e9
commit c63dc4a2d8
1 changed files with 16 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
src/window.c
View File

@@ -1888,23 +1888,35 @@ Returns the window displaying BUFFER.")
{
tem = Fmember (XBUFFER (buffer)->name, Vsame_window_buffer_names);
if (!NILP (tem))
return Fswitch_to_buffer (buffer, Qnil);
{
Fswitch_to_buffer (buffer, Qnil);
return selected_window;
}
tem = Fassoc (XBUFFER (buffer)->name, Vsame_window_buffer_names);
if (!NILP (tem))
return Fswitch_to_buffer (buffer, Qnil);
{
Fswitch_to_buffer (buffer, Qnil);
return selected_window;
}
for (tem = Vsame_window_regexps; CONSP (tem); tem = XCONS (tem)->cdr)
{
Lisp_Object car = XCONS (tem)->car;
if (STRINGP (car)
&& fast_string_match (car, XBUFFER (buffer)->name) >= 0)
return Fswitch_to_buffer (buffer, Qnil);
{
Fswitch_to_buffer (buffer, Qnil);
return selected_window;
}
else if (CONSP (car)
&& STRINGP (XCONS (car)->car)
&& fast_string_match (XCONS (car)->car,
XBUFFER (buffer)->name) >= 0)
return Fswitch_to_buffer (buffer, Qnil);
{
Fswitch_to_buffer (buffer, Qnil);
return selected_window;
}
}
}