gitk: check main window visibility before waiting for it to show

Slightly older version of master from https://github.com/j6t/gitk

If the main window is already visible when gitk waits for it to
become visible, gitk hangs forever.
This commit adds a check whether the window is already visible.
See https://wiki.tcl-lang.org/page/tkwait+visibility

Signed-off-by: Tobias Pietzsch <pietzsch@mycroft.speedport.ip>
Signed-off-by: Johannes Sixt <j6t@kdbg.org>

authored by

Tobias Pietzsch and committed by

Johannes Sixt 1 year ago 2afd8996 c18400c6

+1 -1

1 changed file

expand all

gitk

+1 -1

gitk

··· 12687 12687 wm iconphoto . -default gitlogo gitlogo32 12688 12688 } 12689 12689 # wait for the window to become visible 12690 - tkwait visibility . 12690 + if {![winfo viewable .]} {tkwait visibility .} 12691 12691 set_window_title 12692 12692 update 12693 12693 readrefs