summaryrefslogtreecommitdiff
path: root/Remote.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-01-08 14:37:57 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-01-08 14:40:06 -0400
commitfc669100e5fdf300e2cfbbc1a1ca5d99b03cc564 (patch)
tree4db7142829d0684192a1296bffdfc3e63681b2ad /Remote.hs
parentdc1d51b2df61c8080af9d77cae3a404db9f2231d (diff)
avoid showing remotes with no uuid in status
The filtering of remotes with NoUUID is done in remoteMap, rather than remoteList because a few things should still act on remotes that have no uuid. Particularly sync.
Diffstat (limited to 'Remote.hs')
-rw-r--r--Remote.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Remote.hs b/Remote.hs
index 63d32f429..271665838 100644
--- a/Remote.hs
+++ b/Remote.hs
@@ -93,7 +93,8 @@ enabledRemoteList = filterM (repoNotIgnored . repo) =<< remoteList
{- Map of UUIDs of Remotes and their names. -}
remoteMap :: Annex (M.Map UUID String)
-remoteMap = M.fromList . map (\r -> (uuid r, name r)) <$> remoteList
+remoteMap = M.fromList . map (\r -> (uuid r, name r)) .
+ filter (\r -> uuid r /= NoUUID) <$> remoteList
{- Map of UUIDs and their descriptions.
- The names of Remotes are added to suppliment any description that has