diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-06-22 18:19:50 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-06-22 18:19:50 (GMT) |
| commit | 0b48d22ae0136371b97454822750335beba7b8e9 (patch) | |
| tree | bfa48837bcd4bb9161d22db39f93bc1bb15dc776 /tests/safe.test | |
| parent | b999ae0084ced84f3e315ff9335ebc570d3892c7 (diff) | |
| parent | d5db310e939011b74dead2d218c7b3e7f4b05415 (diff) | |
| download | tk-0b48d22ae0136371b97454822750335beba7b8e9.zip tk-0b48d22ae0136371b97454822750335beba7b8e9.tar.gz tk-0b48d22ae0136371b97454822750335beba7b8e9.tar.bz2 | |
Modernize Tk_Init() to use Tcl 8.6 features.
Diffstat (limited to 'tests/safe.test')
| -rw-r--r-- | tests/safe.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/safe.test b/tests/safe.test index bbd9d25..9a3bcfc 100644 --- a/tests/safe.test +++ b/tests/safe.test @@ -187,7 +187,7 @@ test safe-5.1 {loading Tk in safe interps without master's clearance} -body { interp eval $i {load {} Tk} } -cleanup { safe::interpDelete $i -} -returnCodes error -result {not allowed to start Tk by master's safe::TkInit} +} -returnCodes error -result {not allowed} test safe-5.2 {multi-level Tk loading with clearance} -setup { set safeParent [safe::interpCreate] } -body { |