提交 c0d2c38d 编写于 作者: P Pat Thoyts

git-gui: enable the Tk console when tracing/debugging on Windows

Without any standard channels the trace option is pretty useless on Win32
unless you can show the Tk console which captures such output. This also
permits introspection of the running application to assist in debugging.
Signed-off-by: NPat Thoyts <patthoyts@users.sourceforge.net>
上级 7ae1e727
...@@ -83,6 +83,7 @@ if {![catch {set _verbose $env(GITGUI_VERBOSE)}]} { ...@@ -83,6 +83,7 @@ if {![catch {set _verbose $env(GITGUI_VERBOSE)}]} {
puts stderr "source $name" puts stderr "source $name"
uplevel 1 real__source $name uplevel 1 real__source $name
} }
if {[tk windowingsystem] eq "win32"} { console show }
} }
###################################################################### ######################################################################
...@@ -675,6 +676,7 @@ bind . <Visibility> { ...@@ -675,6 +676,7 @@ bind . <Visibility> {
if {[is_Windows]} { if {[is_Windows]} {
wm iconbitmap . -default $oguilib/git-gui.ico wm iconbitmap . -default $oguilib/git-gui.ico
set ::tk::AlwaysShowSelection 1 set ::tk::AlwaysShowSelection 1
bind . <Control-F2> {console show}
# Spoof an X11 display for SSH # Spoof an X11 display for SSH
if {![info exists env(DISPLAY)]} { if {![info exists env(DISPLAY)]} {
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册