aboutsummaryrefslogtreecommitdiffstats
path: root/src/window.c
diff options
context:
space:
mode:
authorRichard M. Stallman1995-03-14 18:39:58 +0000
committerRichard M. Stallman1995-03-14 18:39:58 +0000
commitc63dc4a2d8ee6f00df69bd84088cdaffb3308fb9 (patch)
tree3421aa4226f191e9e9a6deae6c9038582e81d975 /src/window.c
parent3b9f7964e9dae2b2c6705811cef66a1baca215f4 (diff)
downloademacs-c63dc4a2d8ee6f00df69bd84088cdaffb3308fb9.tar.gz
emacs-c63dc4a2d8ee6f00df69bd84088cdaffb3308fb9.zip
(Fdisplay_buffer): Fix prev change--return selected window.
Diffstat (limited to 'src/window.c')
-rw-r--r--src/window.c20
1 files changed, 16 insertions, 4 deletions
diff --git a/src/window.c b/src/window.c
index f1f50813054..ec561e55223 100644
--- a/src/window.c
+++ b/src/window.c
@@ -1888,23 +1888,35 @@ Returns the window displaying BUFFER.")
1888 { 1888 {
1889 tem = Fmember (XBUFFER (buffer)->name, Vsame_window_buffer_names); 1889 tem = Fmember (XBUFFER (buffer)->name, Vsame_window_buffer_names);
1890 if (!NILP (tem)) 1890 if (!NILP (tem))
1891 return Fswitch_to_buffer (buffer, Qnil); 1891 {
1892 Fswitch_to_buffer (buffer, Qnil);
1893 return selected_window;
1894 }
1892 1895
1893 tem = Fassoc (XBUFFER (buffer)->name, Vsame_window_buffer_names); 1896 tem = Fassoc (XBUFFER (buffer)->name, Vsame_window_buffer_names);
1894 if (!NILP (tem)) 1897 if (!NILP (tem))
1895 return Fswitch_to_buffer (buffer, Qnil); 1898 {
1899 Fswitch_to_buffer (buffer, Qnil);
1900 return selected_window;
1901 }
1896 1902
1897 for (tem = Vsame_window_regexps; CONSP (tem); tem = XCONS (tem)->cdr) 1903 for (tem = Vsame_window_regexps; CONSP (tem); tem = XCONS (tem)->cdr)
1898 { 1904 {
1899 Lisp_Object car = XCONS (tem)->car; 1905 Lisp_Object car = XCONS (tem)->car;
1900 if (STRINGP (car) 1906 if (STRINGP (car)
1901 && fast_string_match (car, XBUFFER (buffer)->name) >= 0) 1907 && fast_string_match (car, XBUFFER (buffer)->name) >= 0)
1902 return Fswitch_to_buffer (buffer, Qnil); 1908 {
1909 Fswitch_to_buffer (buffer, Qnil);
1910 return selected_window;
1911 }
1903 else if (CONSP (car) 1912 else if (CONSP (car)
1904 && STRINGP (XCONS (car)->car) 1913 && STRINGP (XCONS (car)->car)
1905 && fast_string_match (XCONS (car)->car, 1914 && fast_string_match (XCONS (car)->car,
1906 XBUFFER (buffer)->name) >= 0) 1915 XBUFFER (buffer)->name) >= 0)
1907 return Fswitch_to_buffer (buffer, Qnil); 1916 {
1917 Fswitch_to_buffer (buffer, Qnil);
1918 return selected_window;
1919 }
1908 } 1920 }
1909 } 1921 }
1910 1922