summaryrefslogtreecommitdiffstats
path: root/library/safetk.tcl
diff options
context:
space:
mode:
authorcsaba <csaba>2022-12-14 16:20:44 (GMT)
committercsaba <csaba>2022-12-14 16:20:44 (GMT)
commit6376e6ec464042772405c5a2f814f94a96513597 (patch)
tree32fc067973f57b944676651ebd590b24747d641a /library/safetk.tcl
parent2c5f1eb07b0278d52c315f5bb82c2288005163b2 (diff)
downloadtk-6376e6ec464042772405c5a2f814f94a96513597.zip
tk-6376e6ec464042772405c5a2f814f94a96513597.tar.gz
tk-6376e6ec464042772405c5a2f814f94a96513597.tar.bz2
Scaling-related changes in the Tk and Ttk library scripts ready for testing. No changes (yet) in the demo scripts.
Diffstat (limited to 'library/safetk.tcl')
-rw-r--r--library/safetk.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/safetk.tcl b/library/safetk.tcl
index 0eb1220..b86db1a 100644
--- a/library/safetk.tcl
+++ b/library/safetk.tcl
@@ -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 [::tk::ScaleNum 2]
pack $wc -side bottom -fill x
# Container frame