mirror of
https://github.com/commercialhaskell/stackage-server.git
synced 2026-01-12 04:08:29 +01:00
15 lines
357 B
Haskell
15 lines
357 B
Haskell
module Handler.StackageIndex where
|
|
|
|
import Import
|
|
import Data.BlobStore
|
|
import Stackage.Database
|
|
|
|
getStackageIndexR :: SnapName -> Handler TypedContent
|
|
getStackageIndexR slug = do
|
|
-- Insecure, courtesy of cabal-install
|
|
redirect $ concat
|
|
[ "http://haddock.stackage.org/package-index/"
|
|
, toPathPiece slug
|
|
, ".tar.gz"
|
|
]
|