Start9/registry
2
0
Fork 0
mirror of https://github.com/Start9Labs/registry.git synced 2026-03-30 19:54:47 +00:00
Code Issues Packages Projects Releases Wiki Activity

remove redundant constraint

Browse Source
This commit is contained in:
Keagan McClelland
2022-02-07 12:59:44 -07:00
parent 7d10c19ee5
commit 26054c524f
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/Handler/Marketplace.hs
View File

@@ -381,7 +381,7 @@ getPackageListR = do
pure (depId, DependencyRes { dependencyResTitle = depTitle, dependencyResIcon = encodeBase64 icon }) pure (depId, DependencyRes { dependencyResTitle = depTitle, dependencyResIcon = encodeBase64 icon })
) )
deps deps
loadIcon :: (Monad m, MonadResource m, MonadReader r m, Has PkgRepo r) => PkgId -> Version -> m ByteString loadIcon :: (MonadResource m, MonadReader r m, Has PkgRepo r) => PkgId -> Version -> m ByteString
loadIcon pkg version = do loadIcon pkg version = do
(_, _, src) <- getIcon pkg version (_, _, src) <- getIcon pkg version
runConduit $ src .| CL.foldMap id runConduit $ src .| CL.foldMap id