diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-06-22 18:17:52 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-06-22 18:17:52 (GMT) |
| commit | d5db310e939011b74dead2d218c7b3e7f4b05415 (patch) | |
| tree | f84e3ad31df3e5937ebbb98e41e7b8e7854caee6 /tests/safe.test | |
| parent | 4b86a7eea52d42b1390234fb9b710fad125d58a0 (diff) | |
| parent | 43275fa6b210f53456fdd27679904f49a53ebbed (diff) | |
| download | tk-d5db310e939011b74dead2d218c7b3e7f4b05415.zip tk-d5db310e939011b74dead2d218c7b3e7f4b05415.tar.gz tk-d5db310e939011b74dead2d218c7b3e7f4b05415.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 e7ed6c7..69a67ba 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 { |