From df8093fa9acd040135bf62f878fda06d5a7cd8a6 Mon Sep 17 00:00:00 2001
From: nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 15 Sep 2005 02:41:17 +0000
Subject: * ext/tk/lib/tk/dialog.rb: If a dialog does not show up yet,  
 TkDialogObj#name raises an exception. [ruby-talk:156109]

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@9165 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/lib/tk.rb        |  2 +-
 ext/tk/lib/tk/dialog.rb | 13 +++++++------
 2 files changed, 8 insertions(+), 7 deletions(-)

(limited to 'ext')

diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index c24f20970..5bde46007 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -4437,7 +4437,7 @@ end
 #Tk.freeze
 
 module Tk
-  RELEASE_DATE = '2005-09-01'.freeze
+  RELEASE_DATE = '2005-09-15'.freeze
 
   autoload :AUTO_PATH,        'tk/variable'
   autoload :TCL_PACKAGE_PATH, 'tk/variable'
diff --git a/ext/tk/lib/tk/dialog.rb b/ext/tk/lib/tk/dialog.rb
index d468c6e8b..180da101e 100644
--- a/ext/tk/lib/tk/dialog.rb
+++ b/ext/tk/lib/tk/dialog.rb
@@ -199,13 +199,14 @@ class TkDialogObj < TkWindow
   end
 
   def name
-    @buttons[@val]
+    (@val)? @buttons[@val]: nil
   end
-  ######################################################
-  #                                                    #
-  # these methods must be overridden for each dialog   #
-  #                                                    #
-  ######################################################
+
+  ############################################################
+  #                                                          #
+  #  following methods should be overridden for each dialog  #
+  #                                                          #
+  ############################################################
   private
 
   def title
-- 
cgit