Start9/registry
2
0
Fork 0
mirror of https://github.com/Start9Labs/registry.git synced 2026-03-26 02:11:53 +00:00
Code Issues Packages Projects Releases Wiki Activity

formatting

Browse Source
This commit is contained in:
Lucy Cifferello
2022-09-01 16:02:27 -06:00
parent f578e763ba
commit 90a6ce28dd
1 changed files with 33 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

36
src/Handler/Package/V0/S9PK.hs
View File

@@ -32,11 +32,41 @@ import Lib.Types.Core (
S9PK, S9PK,
) )
import Lib.Types.Emver (Version (..)) import Lib.Types.Emver (Version (..))
import Network.HTTP.Types (ByteRange (..), hRange, parseByteRanges, status404, status416) import Network.HTTP.Types (
import Startlude (Applicative (..), Maybe (..), Num ((-)), Text, fmap, foldr, for, liftIO, pure, void, ($), (.), (>>=)) ByteRange (..),
hRange,
parseByteRanges,
status404,
status416,
)
import Startlude (
Applicative (..),
Maybe (..),
Num ((-)),
Text,
fmap,
foldr,
for,
liftIO,
pure,
void,
($),
(.),
(>>=),
)
import System.Directory (getFileSize) import System.Directory (getFileSize)
import System.FilePath (takeBaseName) import System.FilePath (takeBaseName)
import Yesod (Content (..), TypedContent, YesodPersist (runDB), lookupHeader, notFound, respond, sendChunkBS, sendResponseStatus, typeOctet) import Yesod (
Content (..),
TypedContent,
YesodPersist (runDB),
lookupHeader,
notFound,
respond,
sendChunkBS,
sendResponseStatus,
typeOctet,
)
import Yesod.Core (logError) import Yesod.Core (logError)