gwh/slackbuilds
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Revert "Fix `magit--branch-name-at-point'."

Browse source 
This reverts commit e6e77c611f.
Reverting "Fix `magit--branch-name-at-point'." which I meant to put on another branch.
This commit is contained in:
Phil Jackson 2010-04-01 01:25:10 +01:00
parent e6e77c611f
commit 8053974385
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
magit.el
View file

@ -3574,7 +3574,10 @@ Will remove the 'remotes/' prefix if it exists."
(defun magit--branch-name-at-point () (defun magit--branch-name-at-point ()
"Get the branch name in the line at point." "Get the branch name in the line at point."
(let ((branch (magit--branch-name-from-line (thing-at-point 'line)))) (let ((branch (magit--branch-name-from-line (thing-at-point 'line))))
(or branch (error "No branch at point")))) (if (or (= (point) (point-max))
(not branch))
(error "No branch found in current line"))
branch))
(defun magit-branches-window-checkout () (defun magit-branches-window-checkout ()
"Check out the branch in the line at point." "Check out the branch in the line at point."