From fcbf63e62c627deae76c1b8cb8c0876c536ed811 Mon Sep 17 00:00:00 2001
From: Jari Vetoniemi <jari.vetoniemi@indooratlas.com>
Date: Mon, 16 Mar 2020 18:49:26 +0900
Subject: Fresh start

---
 jni/ruby/test/win32ole/test_word.rb | 71 +++++++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)
 create mode 100644 jni/ruby/test/win32ole/test_word.rb

(limited to 'jni/ruby/test/win32ole/test_word.rb')

diff --git a/jni/ruby/test/win32ole/test_word.rb b/jni/ruby/test/win32ole/test_word.rb
new file mode 100644
index 0000000..acfa214
--- /dev/null
+++ b/jni/ruby/test/win32ole/test_word.rb
@@ -0,0 +1,71 @@
+#
+# This is test for [ruby-Bugs#3237]
+#
+begin
+  require 'win32ole'
+rescue LoadError
+end
+require "test/unit"
+
+def word_installed?
+  installed = false
+  w = nil
+  if defined?(WIN32OLE)
+    begin
+      w = WIN32OLE.new('Word.Application')
+      installed = true
+    rescue
+    ensure
+      if w
+        w.quit
+        w = nil
+      end
+    end
+  end
+  return installed
+end
+
+if defined?(WIN32OLE)
+  dotest = word_installed?
+  if !dotest
+    STDERR.puts("\n#{__FILE__} skipped(Microsoft Word not found.)")
+  end
+  if dotest
+    class TestWIN32OLE_WITH_WORD < Test::Unit::TestCase
+      def setup
+        begin
+          @obj = WIN32OLE.new('Word.Application')
+        rescue WIN32OLERuntimeError
+          @obj = nil
+          if !$skipped
+              $skipped = true
+          end
+        end
+      end
+
+      def test_ole_methods
+        if @obj
+          @obj.visible = true
+          @obj.wordbasic.disableAutoMacros(true)
+          assert(true)
+        else
+        end
+      end
+
+      def test_s_connect
+        if @obj
+          obj2 = WIN32OLE.connect("Word.Application")
+          assert_instance_of(WIN32OLE, obj2)
+          obj2.visible = true
+        end
+      end
+
+      def teardown
+        if @obj
+          @obj.quit
+          @obj = nil
+        end
+      end
+    end
+  end
+end
-- 
cgit v1.2.3