use .info, allow multiple info files in same directory
This commit is contained in:
parent
3a5baf2d48
commit
3f85d851bb
2 changed files with 2 additions and 6 deletions
|
@ -84,4 +84,4 @@ getDistributionInfo = do
|
|||
)
|
||||
|
||||
distributionInfoUrl :: String
|
||||
distributionInfoUrl = fromJust Build.SysConfig.upgradelocation ++ "/info"
|
||||
distributionInfoUrl = fromJust Build.SysConfig.upgradelocation ++ ".info"
|
||||
|
|
|
@ -32,11 +32,7 @@ makeinfos = do
|
|||
Nothing -> noop
|
||||
Just (k, _b) -> whenM (inAnnex k) $ do
|
||||
liftIO $ putStrLn f
|
||||
{- The info file is in the same directory
|
||||
- as the annex release bundle file. This
|
||||
- relies on each such file being in its
|
||||
- own directory. -}
|
||||
let infofile = (dropFileName f </> "info")
|
||||
let infofile = f ++ ".info"
|
||||
liftIO $ writeFile infofile $ show $ GitAnnexDistribution
|
||||
{ distributionUrl = mkUrl basedir f
|
||||
, distributionKey = k
|
||||
|
|
Loading…
Reference in a new issue