Merged Irssi SVN (upcoming irssi 0.8.11).

[silc.git] / apps / irssi / src / perl / ui / Window.xs

diff --git a/apps/irssi/src/perl/ui/Window.xs b/apps/irssi/src/perl/ui/Window.xs
index f8ef0315a7533798143eeee5ba4c09b249b50e69..ab52c910913a90f643db63d47b7ef4486922800b 100644 (file)
--- a/apps/irssi/src/perl/ui/Window.xs
+++ b/apps/irssi/src/perl/ui/Window.xs
@@ -160,7 +160,8 @@ CODE:
        old = active_win;
        active_win = window;
        perl_command(cmd, window->active_server, window->active);
-        if (g_slist_find(windows, old) != NULL)
+       if (active_win == window &&
+           g_slist_find(windows, old) != NULL)
                active_win = old;
 
 void