diff options
| author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-06-12 15:25:49 +0000 |
|---|---|---|
| committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-06-12 15:25:49 +0000 |
| commit | c0271cadd7c49f2c3304e93f6190da0b8623c1f3 (patch) | |
| tree | ae877225c9d33c23865c14f81a6cf6252f10e590 /ext/tk/tkutil.c | |
| parent | 82593c058f0a61d8d4bcf7279fed496022330246 (diff) | |
| download | ruby-c0271cadd7c49f2c3304e93f6190da0b8623c1f3.tar.gz | |
* ext/tcltklib/extconf.rb: [EXPERIMENTAL] MacOS X (darwin) support
* ext/tcltklib/tcltklib.c: fix thread trouble on callback proc, and
eliminate warning about instance variable access
* ext/tk/lib/tk/menubar.rb: improve supported menu_spec
* ext/tk/lib/tk/menuspec.rb: [add] menu_spec support library
* ext/tk/lib/tk/root.rb: add menu_spec support
* ext/tk/lib/tk/text.rb: bug fix
* ext/tk/lib/tk/toplevel.rb: add menu_spec support
* ext/tk/sample/menubar?.rb: [add] sample of menu_spec usage
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6454 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/tkutil.c')
| -rw-r--r-- | ext/tk/tkutil.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ext/tk/tkutil.c b/ext/tk/tkutil.c index 78e666d1b1..bc02b43bf2 100644 --- a/ext/tk/tkutil.c +++ b/ext/tk/tkutil.c @@ -27,6 +27,7 @@ static ID ID_split_tklist; static ID ID_toUTF8; static ID ID_fromUTF8; static ID ID_path; +static ID ID_at_path; static ID ID_to_eval; static ID ID_to_s; static ID ID_install_cmd; @@ -1073,7 +1074,7 @@ static VALUE tkobj_path(self) VALUE self; { - return rb_ivar_get(self, ID_path); + return rb_ivar_get(self, ID_at_path); } /*************************************/ @@ -1091,6 +1092,7 @@ Init_tkutil() cMethod = rb_const_get(rb_cObject, rb_intern("Method")); ID_path = rb_intern("path"); + ID_at_path = rb_intern("@path"); ID_to_eval = rb_intern("to_eval"); ID_to_s = rb_intern("to_s"); ID_install_cmd = rb_intern("install_cmd"); |