diff options
Diffstat (limited to 'lib/remote_branch_delete.tcl')
| -rw-r--r-- | lib/remote_branch_delete.tcl | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lib/remote_branch_delete.tcl b/lib/remote_branch_delete.tcl index 4d529f3d18..a07f367410 100644 --- a/lib/remote_branch_delete.tcl +++ b/lib/remote_branch_delete.tcl @@ -23,7 +23,7 @@ field full_cache field cached constructor dialog {} { - global all_remotes M1B use_ttk + global all_remotes M1B make_dialog top w wm title $top [mc "%s (%s): Delete Branch Remotely" [appname] [reponame]] @@ -51,12 +51,8 @@ constructor dialog {} { -text [mc "Remote:"] \ -value remote \ -variable @urltype - if {$use_ttk} { - ttk::combobox $w.dest.remote_m -textvariable @remote \ - -values $all_remotes -state readonly - } else { - eval tk_optionMenu $w.dest.remote_m @remote $all_remotes - } + ttk::combobox $w.dest.remote_m -textvariable @remote \ + -values $all_remotes -state readonly grid $w.dest.remote_r $w.dest.remote_m -sticky w if {[lsearch -sorted -exact $all_remotes origin] != -1} { set remote origin |