summaryrefslogtreecommitdiff
path: root/ext/tk/lib/multi-tk.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ext/tk/lib/multi-tk.rb')
-rw-r--r--ext/tk/lib/multi-tk.rb8
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