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

clean up unused imports

Browse Source
This commit is contained in:
Keagan McClelland
2021-09-29 11:05:07 -06:00
parent 59a028f1d5
commit a563592081
2 changed files with 4 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/Foundation.hs
View File

@@ -26,7 +26,6 @@ import Yesod.Core.Types ( HandlerData(handlerEnv)
) )
import qualified Yesod.Core.Unsafe as Unsafe import qualified Yesod.Core.Unsafe as Unsafe
import qualified Control.Monad.Logger.Extras as Extra
import Control.Monad.Logger.Extras ( wrapSGRCode ) import Control.Monad.Logger.Extras ( wrapSGRCode )
import Control.Monad.Reader.Has ( Has(extract, update) ) import Control.Monad.Reader.Has ( Has(extract, update) )
import Data.String.Interpolate.IsString import Data.String.Interpolate.IsString
@@ -42,7 +41,6 @@ import System.Console.ANSI.Codes ( Color(..)
, SGR(SetColor) , SGR(SetColor)
) )
import System.FilePath ( (</>) ) import System.FilePath ( (</>) )
import Yesod ( defaultMessageLoggerSource )
import Yesod.Persist.Core import Yesod.Persist.Core
-- | The foundation datatype for your application. This can be a good place to -- | The foundation datatype for your application. This can be a good place to

11
src/Lib/PkgRepository.hs
View File

@@ -51,18 +51,18 @@ import Startlude ( ($)
, (<>) , (<>)
, Bool(..) , Bool(..)
, ByteString , ByteString
, Down(Down) , Down(..)
, Either(Left, Right) , Either(..)
, Eq((==)) , Eq((==))
, Exception , Exception
, FilePath , FilePath
, IO , IO
, Integer , Integer
, Maybe(Just, Nothing) , Maybe(..)
, MonadIO(liftIO) , MonadIO(liftIO)
, MonadReader , MonadReader
, Show , Show
, SomeException(SomeException) , SomeException(..)
, filter , filter
, find , find
, for_ , for_
@@ -70,7 +70,6 @@ import Startlude ( ($)
, headMay , headMay
, not , not
, partitionEithers , partitionEithers
, print
, pure , pure
, show , show
, sortOn , sortOn
@@ -91,10 +90,8 @@ import System.FilePath ( (<.>)
import UnliftIO ( MonadUnliftIO import UnliftIO ( MonadUnliftIO
, askRunInIO , askRunInIO
, async , async
, mapConcurrently
, mapConcurrently_ , mapConcurrently_
, newEmptyMVar , newEmptyMVar
, onException
, takeMVar , takeMVar
, wait , wait
) )