1.1c2

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

1 files changed, 20 insertions, 2 deletions

diff --git a/lib/tk.rb b/lib/tk.rb
index 13cb49beaa..f44a1fe4a8 100644
--- a/lib/tk.rb
+++ b/lib/tk.rb
@@ -903,7 +903,7 @@ class TkVariable
     @trace_var.each_with_index{|i,e| 
       if idx < 0 && e[0] == opts && e[1] == cmd
 	idx = i
-	continue
+	next
       end
       e[0].each_byte{|c| newopts += c.chr unless newopts.index(c)}
     }
@@ -937,7 +937,7 @@ class TkVariable
     @trace_elem[elem].each_with_index{|i,e| 
       if idx < 0 && e[0] == opts && e[1] == cmd
 	idx = i
-	continue
+	next
       end
     }
     if idx >= 0
@@ -1322,6 +1322,24 @@ module TkWinfo
   def winfo_viewable
     TkWinfo.viewable self
   end
+  def TkWinfo.pointerx(window)
+    number(tk_call('winfo', 'pointerx', window.path))
+  end
+  def winfo_pointerx
+    TkWinfo.pointerx self
+  end
+  def TkWinfo.pointery(window)
+    number(tk_call('winfo', 'pointery', window.path))
+  end
+  def winfo_pointery
+    TkWinfo.pointery self
+  end
+  def TkWinfo.pointerxy(window)
+    list(tk_call('winfo', 'pointerxy', window.path))
+  end
+  def winfo_pointerxy
+    TkWinfo.pointerxy self
+  end
 end
 
 module TkPack