haskell/stackage
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage.git synced 2026-02-24 12:07:53 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Add a slug file fpco/stackage-server#37

Browse Source
This commit is contained in:
Michael Snoyman 2014-11-23 14:07:15 +02:00
parent 3dfe7b4e1d
commit 8bf144a902
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
Stackage/InstallInfo.hs
View File

@ -126,6 +126,14 @@ getInstallInfo settings = do
, show now , show now
] ]
System.IO.UTF8.writeFile (incexc </> "slug") $ concat
[ date
, "-"
, ghcVer
, if requireHaskellPlatform settings then "hp" else ""
, if isInc then "-inc" else "-exc"
]
return ii return ii
biToSPI :: BuildInfo -> SelectedPackageInfo biToSPI :: BuildInfo -> SelectedPackageInfo

2
Stackage/ServerFiles.hs
View File

@ -37,7 +37,7 @@ createHackageFile isInc hp ii ghcVer date hackageH tarballH = do
hPutStr tarballH $ concat hPutStr tarballH $ concat
[ "#!/bin/bash -ex\n\ntar czfv " [ "#!/bin/bash -ex\n\ntar czfv "
, stackageFP , stackageFP
, " hackage desc ../build*" , " hackage desc slug ../build*"
] ]
indextargz <- getTarballName indextargz <- getTarballName
indexLBS <- L.readFile indextargz indexLBS <- L.readFile indextargz