haskell/stackage-server
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage-server.git synced 2026-01-16 22:28:29 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Warn about revivions in cabal.config #232

Browse Source
This commit is contained in:
Michael Snoyman 2017-12-20 06:45:18 +02:00
parent 4d974136da
commit f9632d734c
No known key found for this signature in database
GPG Key ID: A048E8C057E86876
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/Handler/StackageHome.hs
View File

@ -87,7 +87,11 @@ getStackageCabalConfigR name = track "Handler.StackageHome.getStackageCabalConfi
mapC (Chunk . showPackageLocal) mapC (Chunk . showPackageLocal)
yield $ Chunk $ toBuilder '\n' yield $ Chunk $ toBuilder '\n'
revisionsWarning =
toBuilder (asText "-- NOTE: Due to revisions, this file may not work. See:\n-- https://github.com/fpco/stackage-server/issues/232\n\n")
headerGlobal render = yield $ Chunk $ headerGlobal render = yield $ Chunk $
revisionsWarning ++
toBuilder (asText "-- Stackage snapshot from: ") ++ toBuilder (asText "-- Stackage snapshot from: ") ++
toBuilder (oldSnapshotUrl render) ++ toBuilder (oldSnapshotUrl render) ++
toBuilder (asText "\n-- Please append these contents to the end of your global cabal config file.\n-- To only use tested packages, uncomment the following line\n-- and comment out other remote-repo lines:\n-- remote-repo: stackage-") ++ toBuilder (asText "\n-- Please append these contents to the end of your global cabal config file.\n-- To only use tested packages, uncomment the following line\n-- and comment out other remote-repo lines:\n-- remote-repo: stackage-") ++
@ -97,6 +101,7 @@ getStackageCabalConfigR name = track "Handler.StackageHome.getStackageCabalConfi
toBuilder '\n' toBuilder '\n'
headerLocal render = yield $ Chunk $ headerLocal render = yield $ Chunk $
revisionsWarning ++
toBuilder (asText "-- Stackage snapshot from: ") ++ toBuilder (asText "-- Stackage snapshot from: ") ++
toBuilder (oldSnapshotUrl render) ++ toBuilder (oldSnapshotUrl render) ++
toBuilder (asText "\n-- Please place this file next to your .cabal file as cabal.config\n-- To only use tested packages, uncomment the following line:\n-- remote-repo: stackage-") ++ toBuilder (asText "\n-- Please place this file next to your .cabal file as cabal.config\n-- To only use tested packages, uncomment the following line:\n-- remote-repo: stackage-") ++