From 23bbc2f292b4bd0c4cf7af906e69aaf9533f998c Mon Sep 17 00:00:00 2001
From: nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Tue, 16 Dec 2003 04:27:15 +0000
Subject: * condition bug of if statement on {pack,grid}_propagate methods

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@5198 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog        |  5 +++++
 ext/tk/lib/tk.rb | 15 +++++++++------
 2 files changed, 14 insertions(+), 6 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 8d763c6c6..cb82b1acd 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Tue Dec 16 13:20:43 2003  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
+
+	* ext/tk/lib/tk.rb: condition bug of if statement on 
+	  {pack,grid}_propagate methods
+
 Tue Dec 16 03:17:29 2003  why the lucky stiff  <why@ruby-lang.org>
 
 	* lib/yaml/rubytypes.rb: comments in strings. [ruby-talk:88012]
diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index a73f15e36..692c78167 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -3079,7 +3079,7 @@ module TkGrid
   end
 
   def size(master)
-    tk_call 'grid', 'size', master
+    list(tk_call('grid', 'size', master))
   end
 
   def slaves(master, args)
@@ -4056,9 +4056,10 @@ class TkWindow<TkObject
 
   def pack_propagate(mode=None)
     if mode == None
-      tk_call('pack', 'propagate', epath, mode)
-    else
       bool(tk_call('pack', 'propagate', epath))
+    else
+      tk_call('pack', 'propagate', epath, mode)
+      self
     end
   end
 
@@ -4144,18 +4145,20 @@ class TkWindow<TkObject
 
   def grid_propagate(mode=None)
     if mode == None
-      tk_call('grid', 'propagate', epath, mode)
-    else
       bool(tk_call('grid', 'propagate', epath))
+    else
+      tk_call('grid', 'propagate', epath, mode)
+      self
     end
   end
 
   def grid_remove()
     tk_call 'grid', 'remove', epath
+    self
   end
 
   def grid_size()
-    tk_call 'grid', 'size', epath
+    list(tk_call('grid', 'size', epath))
   end
 
   def grid_slaves(args)
-- 
cgit