gitk: set minimum size on configuration dialog
gitk sets no size limit on its configuration dialog, allowing the user to collapse the window so almost nothing is visible. The geometry manager sets an initial size so all the widgets are visible, though ignores the potentially very long text in the entry widgets in doing so. Let's use this initial size as the minimum. The size information is computed in Tk's idle processing queue, so a wait is required. Signed-off-by: Mark Levedahl <mlevedahl@gmail.com>
Mark Levedahl committed
Oct 4, 2025 at 09:57 UTC
6565ca82203c5926881bba95bae7c17c130b73a4
1 file changed
+4
gitk
+4
@@ -11894,6 +11894,10 @@ proc doprefs {} {
11894
grid $top.buts.ok $top.buts.can -padx 20
11895
grid $top.buts -sticky w -pady 10
11896
bind $top <Visibility> [list focus $top.buts.ok]
11897
+
11898
+ # let geometry manager determine run, set minimum size
11899
+ update idletasks
11900
+ wm minsize $top [winfo reqwidth $top] [winfo reqheight $top]
11901
}
11902
11903
proc choose_extdiff {} {