diff options
Diffstat (limited to 'ext/tk/lib/multi-tk.rb')
-rw-r--r-- | ext/tk/lib/multi-tk.rb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ext/tk/lib/multi-tk.rb b/ext/tk/lib/multi-tk.rb index fd1b511e05..d10e304a3d 100644 --- a/ext/tk/lib/multi-tk.rb +++ b/ext/tk/lib/multi-tk.rb @@ -1577,8 +1577,8 @@ class MultiTkIp eval_proc_core(true, proc{|safe| - $SAFE=safe if $SAFE < safe - Kernel.eval(cmd, *eval_args) + Kernel.eval("$SAFE=#{safe} if $SAFE < #{safe};" << cmd, + *eval_args) }) end alias eval_str eval_string @@ -1591,8 +1591,8 @@ class MultiTkIp Thread.new{ eval_proc_core(true, proc{|safe| - $SAFE=safe if $SAFE < safe - Kernel.eval(cmd, *eval_args) + Kernel.eval("$SAFE=#{safe} if $SAFE < #{safe};" << cmd, + *eval_args) }) } end |