mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

improve comment

Browse source
This commit is contained in:
Joey Hess 2015-09-15 13:12:21 -04:00
parent b08c6d4e16
commit f77a873a15
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Utility/Matcher.hs
View file

@ -144,7 +144,7 @@ isEmpty MAny = True
isEmpty _ = False isEmpty _ = False
{- Combines two matchers, yielding a matcher that will match anything {- Combines two matchers, yielding a matcher that will match anything
- both do. -} - both do. But, if one matcher contains no limits, yield the other one. -}
combineMatchers :: Matcher a -> Matcher a -> Matcher a combineMatchers :: Matcher a -> Matcher a -> Matcher a
combineMatchers a b combineMatchers a b
| isEmpty a = b | isEmpty a = b