* ext/win32ole/sample/example*.rb: Add wait input to quit for examples

  with patch provided by @windwiny [Fixes GH-705]
  https://github.com/ruby/ruby/pull/705


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

3 files changed, 14 insertions, 1 deletions

diff --git a/ext/win32ole/sample/excel1.rb b/ext/win32ole/sample/excel1.rb
index c8cd38e732..7136c938a3 100644
--- a/ext/win32ole/sample/excel1.rb
+++ b/ext/win32ole/sample/excel1.rb
@@ -27,7 +27,10 @@ range.Select
 chart = workbook.Charts.Add;
 
 workbook.saved = TRUE;
-sleep 0.5
+
+print "Now quit Excel... Please enter."
+gets
+
 application.ActiveWorkbook.Close(0);
 application.Quit();
 
diff --git a/ext/win32ole/sample/excel2.rb b/ext/win32ole/sample/excel2.rb
index 95af61ceb6..632882636a 100644
--- a/ext/win32ole/sample/excel2.rb
+++ b/ext/win32ole/sample/excel2.rb
@@ -23,5 +23,8 @@ i.step(180, 10) do |rot|
 end
 # Done, bye
 
+print "Now quit Excel... Please enter."
+gets
+
 excel.ActiveWorkbook.Close(0);
 excel.Quit();
diff --git a/ext/win32ole/sample/excel3.rb b/ext/win32ole/sample/excel3.rb
index 0f96717063..1ace478007 100644
--- a/ext/win32ole/sample/excel3.rb
+++ b/ext/win32ole/sample/excel3.rb
@@ -11,3 +11,10 @@ puts "The number of sheets is #{sheetS.count}"
 puts "Now add 2 sheets after of `#{sheet.name}`"
 sheetS.add({'count'=>2, 'after'=>sheet})
 puts "The number of sheets is #{sheetS.count}"
+
+print "Now quit Excel... Please enter."
+gets
+
+application.ActiveWorkbook.Close(0);
+application.Quit();
+