summaryrefslogtreecommitdiffstats
path: root/ext
diff options
context:
space:
mode:
Diffstat (limited to 'ext')
-rw-r--r--ext/tk/lib/tk.rb4
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index 3c399a24a..b9280e290 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -636,7 +636,7 @@ module TkCore
include TkComm
extend TkComm
- INTERP = TclTkIp.new
+ INTERP = TclTkIp.new unless self.const_defined? :INTERP
INTERP._invoke("proc", "rb_out", "args", <<-'EOL')
regsub -all {!} $args {\\!} args
@@ -3138,7 +3138,7 @@ class TkObject<TkKernel
slot['latinfont'] || slot[:latinfont] ||
slot['asciifont'] || slot[:asciifont] )
font_configure(slot)
- else
+ elsif slot.size > 0
tk_call path, 'configure', *hash_kv(slot)
end