fix test of PROPERTYPUT_REF in some environment

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12888 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 9 insertions, 2 deletions

diff --git a/test/win32ole/test_propertyputref.rb b/test/win32ole/test_propertyputref.rb
index 4d34025623..62f36c2a1e 100644
--- a/test/win32ole/test_propertyputref.rb
+++ b/test/win32ole/test_propertyputref.rb
@@ -9,16 +9,23 @@ if defined?(WIN32OLE)
     def setup
       begin
         @sapi = WIN32OLE.new('SAPI.SpVoice')
+        @sv = @sapi.voice
+        puts @sv
       rescue WIN32OLERuntimeError
         @sapi = nil
       end
     end
     def test_sapi
       if @sapi
-        new_id = @sapi.getvoices.item(2).Id
-        @sapi.voice = @sapi.getvoices.item(2)
+        new_id = @sapi.getvoices.item(0).Id
+        @sapi.voice = @sapi.getvoices.item(0)
         assert_equal(new_id, @sapi.voice.Id)
       end
     end
+    def teardown
+      if @sapi
+        @sapi.voice = @sv
+      end
+    end
   end
 end