2016-03-19 11:12:05 +01:00
|
|
|
#!/usr/bin/env stack
|
|
|
|
|
{- stack
|
|
|
|
|
--resolver lts-3.10
|
|
|
|
|
--install-ghc runghc
|
|
|
|
|
-}
|
|
|
|
|
|
|
|
|
|
import Data.Foldable
|
|
|
|
|
import System.Process
|
|
|
|
|
|
|
|
|
|
main :: IO ()
|
|
|
|
|
main = do
|
|
|
|
|
sources <- words <$> readFile "sources.txt"
|
|
|
|
|
forM_ sources $ \ source -> do
|
2016-04-15 13:23:23 +02:00
|
|
|
callCommand ("stack upload --no-signature " ++ source)
|
