diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-03-29 18:28:37 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-03-29 18:28:37 -0400 |
| commit | 8f9951369d5e85e3a1bf323760f0c873a3f21b97 (patch) | |
| tree | 150c2124fb56da9ac4770aa75839945774d77c30 /Remote/Git.hs | |
| parent | 43bdebbc2d2c22623a0114dca51b8339bf7231c4 (diff) | |
refactor
Diffstat (limited to 'Remote/Git.hs')
| -rw-r--r-- | Remote/Git.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs index 984f9c88f..d0dedd4fd 100644 --- a/Remote/Git.hs +++ b/Remote/Git.hs @@ -14,7 +14,6 @@ import Control.Exception.Extensible import Control.Monad.State (liftIO) import qualified Data.Map as M import System.Cmd.Utils -import Control.Monad (filterM) import RemoteClass import Types @@ -41,7 +40,7 @@ remote = RemoteType { list :: Annex [Git.Repo] list = do g <- Annex.gitRepo - filterM remoteNotIgnored $ Git.remotes g + return $ Git.remotes g gen :: Git.Repo -> Maybe (M.Map String String) -> Annex (Remote Annex) gen repo _ = do |