more distributionupdate fixes
This commit is contained in:
parent
e92b6050b3
commit
1570f00ed9
1 changed files with 2 additions and 1 deletions
|
@ -21,13 +21,14 @@ main = do
|
||||||
|
|
||||||
makeinfos :: Annex ()
|
makeinfos :: Annex ()
|
||||||
makeinfos = do
|
makeinfos = do
|
||||||
|
version <- liftIO getChangelogVersion
|
||||||
void $ inRepo $ runBool
|
void $ inRepo $ runBool
|
||||||
[ Param "commit"
|
[ Param "commit"
|
||||||
|
, Param "-a"
|
||||||
, Param "-m"
|
, Param "-m"
|
||||||
, Param $ "publishing git-annex " ++ version
|
, Param $ "publishing git-annex " ++ version
|
||||||
]
|
]
|
||||||
basedir <- liftIO getRepoDir
|
basedir <- liftIO getRepoDir
|
||||||
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 (const False) True (basedir </> "git-annex")
|
fs <- liftIO $ dirContentsRecursiveSkipping (const False) True (basedir </> "git-annex")
|
||||||
|
|
Loading…
Add table
Reference in a new issue