00-index.tar.gz redirects to S3

This commit is contained in:
Michael Snoyman 2015-05-14 13:22:31 +03:00
parent fd4e84e14d
commit a53dadcbfc
2 changed files with 7 additions and 14 deletions

View File

@ -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"
]

View File

@ -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