From 52104dae6f5175f01395a657fd40423d1196604a Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 30 Dec 2011 18:36:40 -0400 Subject: refactor --- Annex/Branch.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Annex') diff --git a/Annex/Branch.hs b/Annex/Branch.hs index 8c9d1582a..d3a81d8e5 100644 --- a/Annex/Branch.hs +++ b/Annex/Branch.hs @@ -58,7 +58,7 @@ hasSibling = not . null <$> siblingBranches {- List of git-annex (refs, branches), including the main one and any - from remotes. Duplicate refs are filtered out. -} siblingBranches :: Annex [(Git.Ref, Git.Branch)] -siblingBranches = inRepo $ Git.Ref.matching name +siblingBranches = inRepo $ Git.Ref.matchingUniq name {- Creates the branch, if it does not already exist. -} create :: Annex () -- cgit v1.2.3