X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=git-gui%2Flib%2Fclass.tcl;h=dc2141192a21e7416268cc94beda78d6ceb8f86f;hb=42fc11c1103a88c49233f04dc0c2f5659b3973fe;hp=24e8cecea46d3da6d94b04917a2776e541c234f3;hpb=b8de7f764e1a9f6e8dfb587a6145906394fa607d;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 {}