From 32628d41cd0803728b586e999fcdf6a767683a92 Mon Sep 17 00:00:00 2001
From: Tobie Langel <tobie.langel@gmail.com>
Date: Wed, 28 May 2008 01:51:44 +0200
Subject: [PATCH] Fix unit test freeze in IE.

---
 CHANGELOG          | 2 ++
 test/lib/jstest.rb | 4 +---
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/CHANGELOG b/CHANGELOG
index 92f58bf..4f31d44 100644
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,5 @@
+* Fix unit test freeze in IE. (Tobie Langel)
+
 * Ensure Hash does not return keys from the prototype chain (e.g., constructor, valueOf, toString). (kangax)
 
 * Fix toString/valueOf sharing same method reference via closure in Class#addMethods. Use plain property assignment, since Object.extend fails to enumerate over toString/valueOf. (kangax)
diff --git a/test/lib/jstest.rb b/test/lib/jstest.rb
index 85df342..2d65e08 100644
--- a/test/lib/jstest.rb
+++ b/test/lib/jstest.rb
@@ -86,9 +86,7 @@ class IEBrowser < Browser
       ie = WIN32OLE.new('InternetExplorer.Application')
       ie.visible = true
       ie.Navigate(url)
-      while ie.ReadyState != 4 do
-        sleep(1)
-      end
+      sleep 0.01 while ie.Busy || ie.ReadyState != 4
     end
   end