mirror of
https://github.com/commercialhaskell/stackage-server.git
synced 2026-01-12 04:08:29 +01:00
Ignore non-present packages
This commit is contained in:
parent
9c52d4b6aa
commit
8db35e2f83
@ -83,7 +83,7 @@ redirectWithVersion slug rest =
|
||||
Entity sid _ <- lookupSnapshot slug >>= maybe notFound return
|
||||
mversion <- getPackageVersionBySnapshot sid pkg
|
||||
case mversion of
|
||||
Nothing -> error "That package is not part of this snapshot."
|
||||
Nothing -> return Nothing -- error "That package is not part of this snapshot."
|
||||
Just version -> do
|
||||
return (Just (HaddockR slug [pkg <> "-" <> version, file]))
|
||||
_ -> return Nothing
|
||||
|
||||
Loading…
Reference in New Issue
Block a user