diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-12-29 22:56:24 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-12-29 22:56:24 (GMT) |
commit | da883877fe19f11084092eb164c88c49485d0058 (patch) | |
tree | 347a71e76d6dec98bb6e97f68188703ba3fd24d0 /library/dialog.tcl | |
parent | 1ba683df5b82930fde24c4b820700304a278296a (diff) | |
download | tk-da883877fe19f11084092eb164c88c49485d0058.zip tk-da883877fe19f11084092eb164c88c49485d0058.tar.gz tk-da883877fe19f11084092eb164c88c49485d0058.tar.bz2 |
Use some more point-expressions in stead of tk::ScaleNum
Diffstat (limited to 'library/dialog.tcl')
-rw-r--r-- | library/dialog.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/dialog.tcl b/library/dialog.tcl index e011d70..16ba128 100644 --- a/library/dialog.tcl +++ b/library/dialog.tcl @@ -109,7 +109,7 @@ proc ::tk_dialog {w title text bitmap default args} { $w.button$i configure -default normal } grid $w.button$i -in $w.bot -column $i -row 0 -sticky ew \ - -padx [::tk::ScaleNum 10] -pady [::tk::ScaleNum 4] + -padx 7.5p -pady 3p grid columnconfigure $w.bot $i # We boost the size of some Mac buttons for l&f if {$windowingsystem eq "aqua"} { |