use System Monitor Control for spec of Win32OLE.

* spec/ruby/library/win32ole/win32ole_method/event_interface_spec.rb:
  use System Monitor Control instead of Microsoft Internet Control

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

spec/ruby/library/win32ole/win32ole_method/event_interface_spec.rb

@@ -1,26 +1,28 @@
 platform_is :windows do
-  require 'win32ole'
+  require_relative '../fixtures/classes'
+  guard -> { WIN32OLESpecs::SYSTEM_MONITOR_CONTROL_AVAILABLE } do
+
+    describe "WIN32OLE_METHOD#event_interface" do
+      before :each do
+        ole_type = WIN32OLE_TYPE.new("System Monitor Control", "SystemMonitor")
+        @on_dbl_click_method = WIN32OLE_METHOD.new(ole_type, "OnDblClick")
+        ole_type = WIN32OLE_TYPE.new("Microsoft Shell Controls And Automation", "Shell")
+        @namespace_method = WIN32OLE_METHOD.new(ole_type, "namespace")
+      end
+
+      it "raises ArgumentError if argument is given" do
+        lambda { @on_dbl_click_method.event_interface(1) }.should raise_error ArgumentError
+      end
+
+      it "returns expected string for System Monitor Control's 'OnDblClick' method" do
+        @on_dbl_click_method.event_interface.should == "DISystemMonitorEvents"
+      end
+
+      it "returns nil if method has no event interface" do
+        @namespace_method.event_interface.should be_nil
+      end
 
-  describe "WIN32OLE_METHOD#event_interface" do
-    before :each do
-      ole_type = WIN32OLE_TYPE.new("Microsoft Internet Controls", "WebBrowser")
-      @navigate_method = WIN32OLE_METHOD.new(ole_type, "NavigateComplete")
-      ole_type = WIN32OLE_TYPE.new("Microsoft Shell Controls And Automation", "Shell")
-      @namespace_method = WIN32OLE_METHOD.new(ole_type, "namespace")
     end
-
-    it "raises ArgumentError if argument is given" do
-      lambda { @navigate_method.event_interface(1) }.should raise_error ArgumentError
-    end
-
-    it "returns expected string for browser's 'NavigateComplete' method" do
-      @navigate_method.event_interface.should == "DWebBrowserEvents"
-    end
-
-    it "returns nil if method has no event interface" do
-      @namespace_method.event_interface.should be_nil
-    end
-
   end
 
 end