X-Git-Url: https://asedeno.scripts.mit.edu/gitweb/?a=blobdiff_plain;f=git-gui%2Flib%2Fclass.tcl;h=dc2141192a21e7416268cc94beda78d6ceb8f86f;hb=b7380fa7a9adb52860eef7e8885fb8bc179beae1;hp=24e8cecea46d3da6d94b04917a2776e541c234f3;hpb=a6954452ecf757523b31d6eaaf7e00c7a2d91e46;p=git.git

diff --git a/git-gui/lib/class.tcl b/git-gui/lib/class.tcl
index 24e8cecea..dc2141192 100644
--- a/git-gui/lib/class.tcl
+++ b/git-gui/lib/class.tcl
@@ -148,11 +148,12 @@ proc make_toplevel {t w args} {
 		}
 	}
 
-	if {[winfo ismapped .]} {
+	if {$::root_exists || [winfo ismapped .]} {
 		regsub -all {::} $this {__} w
 		set top .$w
 		set pfx $top
 		toplevel $top
+		set ::root_exists 1
 	} else {
 		set top .
 		set pfx {}