diff options
| author | max <max@tclers.tk> | 2021-10-18 16:07:19 (GMT) |
|---|---|---|
| committer | max <max@tclers.tk> | 2021-10-18 16:07:19 (GMT) |
| commit | 950b53c38fcd073114b9817adc2b34120855329c (patch) | |
| tree | 77c66bcebb72ee1d95ec2267b54fcc55e005661c /library | |
| parent | 457456e2e721dd032dfed9ed2a6c851536a24b66 (diff) | |
| download | tk-950b53c38fcd073114b9817adc2b34120855329c.zip tk-950b53c38fcd073114b9817adc2b34120855329c.tar.gz tk-950b53c38fcd073114b9817adc2b34120855329c.tar.bz2 | |
Let the font chooser dialog also expand in Y direction
Diffstat (limited to 'library')
| -rw-r--r-- | library/fontchooser.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/library/fontchooser.tcl b/library/fontchooser.tcl index 9d49c57..e735ae4 100644 --- a/library/fontchooser.tcl +++ b/library/fontchooser.tcl @@ -247,6 +247,7 @@ proc ::tk::fontchooser::Create {} { grid $S(W).lfonts x $S(W).lstyles x $S(W).lsizes x ^ -in $outer -sticky news grid $WE x $WS - - x ^ -in $outer -sticky news -pady {15 30} grid configure $bbox -sticky n + grid rowconfigure $outer 2 -weight 1 grid columnconfigure $outer {1 3 5} -minsize $minsize(gap) grid columnconfigure $outer {0 2 4} -weight 1 grid columnconfigure $outer 0 -minsize $minsize(fonts) |