From ed05e9f6c027a23ce45bcdbac4196058ed5d0e07 Mon Sep 17 00:00:00 2001 From: Pat Thoyts Date: Fri, 17 May 2013 10:51:01 +0100 Subject: [PATCH] git-gui: change dialog button positions for Windows to suit platform. On windows it is more common to have cancel furthest on the right. Signed-off-by: Pat Thoyts --- lib/choose_repository.tcl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/choose_repository.tcl b/lib/choose_repository.tcl index 657f7d5..ee58981 100644 --- a/lib/choose_repository.tcl +++ b/lib/choose_repository.tcl @@ -286,7 +286,9 @@ method _next {action} { destroy $w_body if {![winfo exists $w_next]} { ${NS}::button $w_next -default active - pack $w_next -side right -padx 5 -before $w_quit + set pos -before + if {[tk windowingsystem] eq "win32"} { set pos -after } + pack $w_next -side right -padx 5 $pos $w_quit } _do_$action $this } -- 2.11.4.GIT