remove Extra-Source-Files nonsense
will need to find a better way to make sdist work, this is not livable
This commit is contained in:
parent
cdbcd6f495
commit
3efba481b5
2 changed files with 0 additions and 5 deletions
|
@ -2,8 +2,6 @@
|
||||||
|
|
||||||
import System.Directory
|
import System.Directory
|
||||||
import Data.List
|
import Data.List
|
||||||
import Data.String.Utils
|
|
||||||
import System.Cmd.Utils
|
|
||||||
|
|
||||||
import TestConfig
|
import TestConfig
|
||||||
|
|
||||||
|
@ -73,11 +71,9 @@ getVersionString = do
|
||||||
cabalSetup :: IO ()
|
cabalSetup :: IO ()
|
||||||
cabalSetup = do
|
cabalSetup = do
|
||||||
version <- getVersionString
|
version <- getVersionString
|
||||||
(_, filelist) <- pipeLinesFrom "find" (words ". -name .git -prune -o -name dist -prune -o -not -name *.hi -not -name *.o -not -name configure -not -name *.tmp -type f -print")
|
|
||||||
cabal <- readFile cabalfile
|
cabal <- readFile cabalfile
|
||||||
writeFile tmpcabalfile $ unlines $
|
writeFile tmpcabalfile $ unlines $
|
||||||
map (setfield "Version" version) $
|
map (setfield "Version" version) $
|
||||||
map (setfield "Extra-Source-Files" $ join ", " $ sort filelist) $
|
|
||||||
lines cabal
|
lines cabal
|
||||||
renameFile tmpcabalfile cabalfile
|
renameFile tmpcabalfile cabalfile
|
||||||
where
|
where
|
||||||
|
|
File diff suppressed because one or more lines are too long
Loading…
Add table
Add a link
Reference in a new issue