From 2a1b4c0a170bf18944b4b15905194c62aafd7472 Mon Sep 17 00:00:00 2001
From: Timo Sirainen <cras@irssi.org>
Date: Thu, 14 Mar 2002 21:59:16 +0000
Subject: [PATCH] $window->command() changed active window temporarily to
 wanted one and then back to old one. This wasn't very good idea if the old
 window was destroyed by the command..

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2613 dbcabf3a-b0e7-0310-adc4-f8d773084564
---
 src/perl/ui/Window.xs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/perl/ui/Window.xs b/src/perl/ui/Window.xs
index ac65480e..cadff1ab 100644
--- a/src/perl/ui/Window.xs
+++ b/src/perl/ui/Window.xs
@@ -158,7 +158,8 @@ CODE:
 	old = active_win;
 	active_win = window;
 	perl_command(cmd, window->active_server, window->active);
-        active_win = old;
+        if (g_slist_find(windows, old) != NULL)
+        	active_win = old;
 
 void
 window_item_add(window, item, automatic)