summaryrefslogtreecommitdiff
path: root/ext/tk/lib/tk.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ext/tk/lib/tk.rb')
-rw-r--r--ext/tk/lib/tk.rb7
1 files changed, 4 insertions, 3 deletions
diff --git a/ext/tk/lib/tk.rb b/ext/tk/lib/tk.rb
index 464f7f179e..c1550680cc 100644
--- a/ext/tk/lib/tk.rb
+++ b/ext/tk/lib/tk.rb
@@ -847,13 +847,14 @@ module TkCore
args.flatten!
print "=> ", args.join(" ").inspect, "\n" if $DEBUG
begin
- res = INTERP._invoke(*args)
+ # res = INTERP._invoke(*args).taint
+ res = INTERP._invoke(*args) # _invoke returns a TAITED string
rescue NameError
err = $!
begin
args.unshift "unknown"
- #res = INTERP._invoke(*args)
- res = INTERP._invoke(*args).taint
+ #res = INTERP._invoke(*args).taint
+ res = INTERP._invoke(*args) # _invoke returns a TAITED string
rescue
fail unless /^invalid command/ =~ $!
fail err