diff options
Diffstat (limited to 'library/safetk.tcl')
| -rw-r--r-- | library/safetk.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/safetk.tcl b/library/safetk.tcl index 9e71cc6..f3dacd7 100644 --- a/library/safetk.tcl +++ b/library/safetk.tcl @@ -2,7 +2,7 @@ # # Support procs to use Tk in safe interpreters. # -# Copyright (c) 1997 Sun Microsystems, Inc. +# Copyright © 1997 Sun Microsystems, Inc. # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. @@ -250,7 +250,7 @@ proc ::safe::tkTopLevel {child display} { -command [list ::safe::tkDelete $w $w $child] pack $wc.fb.b -side right -fill both pack $wc.fb -side right -fill both -expand 1 - pack $wc.l -side left -fill both -expand 1 -ipady 2 + pack $wc.l -side left -fill both -expand 1 -ipady 1.5p pack $wc -side bottom -fill x # Container frame |