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

cost bugfixes

Browse source
This commit is contained in:
Joey Hess 2011-03-30 15:15:46 -04:00
parent fdd455e913
commit 0c73c08c1c
6 changed files with 37 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Remote.hs
View file

@ -75,8 +75,7 @@ genList = do
mapM (gen m t) l'
gen m t r = do
u <- getUUID r
cst <- remoteCost r
generate t r u cst (M.lookup u m)
generate t r u (M.lookup u m)
{- Looks up a remote by name. (Or by UUID.) -}
byName :: String -> Annex (Remote Annex)