diff options
Diffstat (limited to 'gitk')
| -rwxr-xr-x | gitk | 9 |
1 files changed, 8 insertions, 1 deletions
@@ -5502,10 +5502,16 @@ proc cherrypick {} { # context menu for a head proc headmenu {x y id head} { - global headmenuid headmenuhead headctxmenu + global headmenuid headmenuhead headctxmenu mainhead set headmenuid $id set headmenuhead $head + set state normal + if {$head eq $mainhead} { + set state disabled + } + $headctxmenu entryconfigure 0 -state $state + $headctxmenu entryconfigure 1 -state $state tk_popup $headctxmenu $x $y } @@ -5537,6 +5543,7 @@ proc rmbranch {} { set head $headmenuhead set id $headmenuid + # this check shouldn't be needed any more... if {$head eq $mainhead} { error_popup "Cannot delete the currently checked-out branch" return |