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

We are interested in refs not revs.

Browse source 
* magit.el (magit-list-interesting-refs): Renamed from
magit-list-interesting-revisions.  Updated all callers.
This commit is contained in:
Marius Vollmer 2009-06-06 13:40:29 +03:00
parent 824f0e0e05
commit e0911af08e
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
magit.el
View file

@ -370,7 +370,7 @@ Many Magit faces inherit from this one by default."
;;; Revisions and ranges
(defun magit-list-interesting-revisions ()
(defun magit-list-interesting-refs ()
(append (magit-git-lines "branch -a | cut -c3-")
(magit-git-lines "tag")))
@ -378,7 +378,7 @@ Many Magit faces inherit from this one by default."
(let* ((prompt (if def
(format "%s (default %s): " prompt def)
(format "%s: " prompt)))
(rev (completing-read prompt (magit-list-interesting-revisions)
(rev (completing-read prompt (magit-list-interesting-refs)
nil nil nil nil def)))
(if (string= rev "")
nil
@ -2017,9 +2017,9 @@ in log buffer."
(not (null (magit-get-svn-branch-name))))
(defun magit-get-svn-branch-name ()
(let ((interesting-revisions (magit-list-interesting-revisions)))
(or (find "git-svn" interesting-revisions :test 'equal)
(find "trunk" interesting-revisions :test 'equal))))
(let ((interesting-refs (magit-list-interesting-refs)))
(or (find "git-svn" interesting-refs :test 'equal)
(find "trunk" interesting-refs :test 'equal))))
;;; Resetting