summaryrefslogtreecommitdiff
path: root/lib/tkthcore.rb
diff options
context:
space:
mode:
Diffstat (limited to 'lib/tkthcore.rb')
-rw-r--r--lib/tkthcore.rb5
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/tkthcore.rb b/lib/tkthcore.rb
index adbad775d0..5e0abd72c5 100644
--- a/lib/tkthcore.rb
+++ b/lib/tkthcore.rb
@@ -109,7 +109,7 @@ module Tk
val
end
- def tk_call(*args)
+ def tk_call(str, *args)
Tk.init if $tk_not_init
args = args.collect{|s|
next if s == None
@@ -129,7 +129,8 @@ module Tk
"{#{s}}"
end
}
- str = args.join(" ")
+ str += " "
+ str += args.join(" ")
Qin.push str
return Qout.pop
end