gitk: Force the focus to the main window on Windows

j6t · paulusmack · commit e4df519f05ab · 2008-12-22T10:16:18.000+11:00
On msysGit, the focus is first on the (Tk) console.  This console is then
hidden, but keeps the focus.  Work around that by forcing the focus onto
the gitk window.

This fixes msysGit issue 14.  Diagnosed and originally fixed by
Johannes Schindelin.

Signed-off-by: Johannes Sixt &lt;j6t@kdbg.org&gt;
Signed-off-by: Paul Mackerras &lt;paulus@samba.org&gt;
diff --git a/gitk b/gitk
@@ -10914,4 +10914,9 @@ if {[info exists permviews]} {
 	addviewmenu $n
     }
 }
+
+if {[tk windowingsystem] eq "win32"} {
+    focus -force .
+}
+
 getcommits {}

Original file line number	Diff line number	Diff line change
`@@ -10914,4 +10914,9 @@ if {[info exists permviews]} {`
`10914`	`10914`	`addviewmenu $n`
`10915`	`10915`	`}`
`10916`	`10916`	`}`
	`10917`	`+`
	`10918`	`+if {[tk windowingsystem] eq "win32"} {`
	`10919`	`+ focus -force .`
	`10920`	`+}`
	`10921`	`+`
`10917`	`10922`	`getcommits {}`