* ext/tk/lib/tk.rb: TkComm._at() supprts both of "@x,y" and "@x"

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@7211 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2004-11-05 07:07:39 +00:00
parent 4286469353
commit ff814d4c37
2 changed files with 10 additions and 2 deletions

View File

@ -1,3 +1,7 @@
Fri Nov 5 16:05:32 2004 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tk/lib/tk.rb: TkComm._at() supprts both of "@x,y" and "@x"
Fri Nov 5 13:22:58 2004 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tk/lib/tk/text.rb: sorry. bug fix again.

View File

@ -179,8 +179,12 @@ module TkComm
private :_genobj_for_tkwidget
module_function :_genobj_for_tkwidget
def _at(x,y)
"@#{Integer(x)},#{Integer(y)}"
def _at(x,y=nil)
if y
"@#{Integer(x)},#{Integer(y)}"
else
"@#{Integer(x)}"
end
end
module_function :_at