]> git.eshelyaron.com Git - emacs.git/commitdiff
(Fdisplay_buffer): Fix prev change--return selected window.
authorRichard M. Stallman <rms@gnu.org>
Tue, 14 Mar 1995 18:39:58 +0000 (18:39 +0000)
committerRichard M. Stallman <rms@gnu.org>
Tue, 14 Mar 1995 18:39:58 +0000 (18:39 +0000)
src/window.c

index f1f5081305496d8d5947b64a7acf76b1d99c13f7..ec561e552237c28b43501211ee566e75ec356437 100644 (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;
+           }
        }
     }