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

fix build

Browse source 
Need to recurse into subdirs to follow git-annex links.
This commit is contained in:
Joey Hess 2013-12-21 12:37:53 -04:00
parent 040889ff40
commit abffc91575
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Build/DistributionUpdate.hs
View file

@ -25,7 +25,7 @@ makeinfos = do
version <- liftIO getChangelogVersion version <- liftIO getChangelogVersion
now <- liftIO getCurrentTime now <- liftIO getCurrentTime
liftIO $ putStrLn $ "building info files for version " ++ version ++ " in " ++ basedir liftIO $ putStrLn $ "building info files for version " ++ version ++ " in " ++ basedir
fs <- liftIO $ dirContentsRecursiveSkipping (== "info") (basedir </> "git-annex") fs <- liftIO $ dirContentsRecursiveSkipping (== "info") True (basedir </> "git-annex")
forM_ fs $ \f -> do forM_ fs $ \f -> do
v <- lookupFile f v <- lookupFile f
case v of case v of