diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-14 10:33:31 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-14 10:33:31 (GMT) |
| commit | ad861a0433fe3325ce081e6df2b40ed7fd670fe9 (patch) | |
| tree | 4c15e7bb088670fff60971576f04371634ec0c66 /library | |
| parent | 19013242170fcb53f480c10a5ca48578456d2f1b (diff) | |
| download | tk-ad861a0433fe3325ce081e6df2b40ed7fd670fe9.zip tk-ad861a0433fe3325ce081e6df2b40ed7fd670fe9.tar.gz tk-ad861a0433fe3325ce081e6df2b40ed7fd670fe9.tar.bz2 | |
Prevent the usage of the term safe/unsafe child
Diffstat (limited to 'library')
| -rw-r--r-- | library/safetk.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/safetk.tcl b/library/safetk.tcl index 841a0b6..9e71cc6 100644 --- a/library/safetk.tcl +++ b/library/safetk.tcl @@ -220,7 +220,7 @@ proc ::safe::tkTopLevel {child display} { set w ".safe$tkSafeId" if {[catch {toplevel $w -screen $display -class SafeTk} msg]} { return -code error -errorcode {TK TOPLEVEL SAFE} \ - "Unable to create toplevel for safe child \"$child\" ($msg)" + "Unable to create toplevel for \"$child\" ($msg)" } Log $child "New toplevel $w" NOTICE |