mirror of
https://github.com/commercialhaskell/stackage-server.git
synced 2026-01-11 19:58:28 +01:00
00-index.tar.gz redirects to S3
This commit is contained in:
parent
fd4e84e14d
commit
a53dadcbfc
@ -6,16 +6,9 @@ import Stackage.Database
|
||||
|
||||
getStackageIndexR :: SnapName -> Handler TypedContent
|
||||
getStackageIndexR slug = do
|
||||
error "getStackageIndexR"
|
||||
{-
|
||||
Entity _ stackage <- runDB $ getBy404 $ UniqueSnapshot slug
|
||||
let ident = stackageIdent stackage
|
||||
msrc <- storeRead $ CabalIndex ident
|
||||
case msrc of
|
||||
Nothing -> notFound
|
||||
Just src -> do
|
||||
setEtag $ toPathPiece ident
|
||||
addHeader "content-disposition" "attachment; filename=\"00-index.tar.gz\""
|
||||
neverExpires
|
||||
respondSource "application/x-gzip" $ mapOutput (Chunk . toBuilder) src
|
||||
-}
|
||||
-- Insecure, courtesy of cabal-install
|
||||
redirect $ concat
|
||||
[ "http://haddock.stackage.org/package-index/"
|
||||
, toPathPiece slug
|
||||
, ".tar.gz"
|
||||
]
|
||||
|
||||
@ -155,7 +155,7 @@ library
|
||||
, blaze-html
|
||||
, haddock-library
|
||||
, async
|
||||
, yesod-gitrepo >= 0.1.1
|
||||
, yesod-gitrepo >= 0.1.1 && < 0.2
|
||||
, hoogle
|
||||
, spoon
|
||||
, deepseq
|
||||
|
||||
Loading…
Reference in New Issue
Block a user