X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=git-gui%2Flib%2Fbranch.tcl;h=4f648b2bc7a52e965ee62bcce7687c0e356f3f31;hb=82ff9d2c8b0d449fbaae21a69bcc3b98a4012180;hp=caaee5cf17ff6033158dd1c7db219f1298ac5b86;hpb=8e29f903eb366b2d2e846dc35ec4510d2cb263ad;p=git.git diff --git a/git-gui/lib/branch.tcl b/git-gui/lib/branch.tcl index caaee5cf1..4f648b2bc 100644 --- a/git-gui/lib/branch.tcl +++ b/git-gui/lib/branch.tcl @@ -201,12 +201,14 @@ proc do_create_branch {} { pack $w.desc -anchor nw -fill x -pady 5 -padx 5 labelframe $w.from -text {Starting Revision} - radiobutton $w.from.head_r \ - -text {Local Branch:} \ - -value head \ - -variable create_branch_revtype - eval tk_optionMenu $w.from.head_m create_branch_head $all_heads - grid $w.from.head_r $w.from.head_m -sticky w + if {$all_heads ne {}} { + radiobutton $w.from.head_r \ + -text {Local Branch:} \ + -value head \ + -variable create_branch_revtype + eval tk_optionMenu $w.from.head_m create_branch_head $all_heads + grid $w.from.head_r $w.from.head_m -sticky w + } set all_trackings [all_tracking_branches] if {$all_trackings ne {}} { set create_branch_trackinghead [lindex $all_trackings 0]