summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--ext/tk/lib/tk.rb3
2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index e157f5d2f..93f87bbed 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Tue Jan 13 16:50:03 2004 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
+
+ * ext/tk/lib/tk.rb: use $0 as the default application class name.
+
Tue Jan 13 14:48:01 2004 Yukihiro Matsumoto <matz@ruby-lang.org>
* parse.y (primary): allow no "when" case. [ruby-dev:22578]
diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index 6bae4d8f4..a7e63edaf 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -662,7 +662,8 @@ module TkCore
if self.const_defined? :IP_NAME
name = IP_NAME.to_s
else
- name = nil
+ #name = nil
+ name = $0
end
if self.const_defined? :IP_OPTS
if IP_OPTS.kind_of?(Hash)