mirror of
https://github.com/Start9Labs/registry.git
synced 2026-03-26 02:11:53 +00:00
removes unneeded deps
This commit is contained in:
@@ -44,20 +44,18 @@ dependencies:
|
||||
- comonad
|
||||
- conduit
|
||||
- conduit-extra
|
||||
- cryptonite
|
||||
- data-default
|
||||
- directory
|
||||
- dns
|
||||
- either
|
||||
- errors
|
||||
- fast-logger >=2.2 && <2.5
|
||||
- file-embed
|
||||
- fast-logger >=2.2 && <2.5
|
||||
- filepath
|
||||
- http-client
|
||||
- http-conduit
|
||||
- http-types
|
||||
- interpolate
|
||||
- iso8601-time
|
||||
- jose-jwt
|
||||
- lens
|
||||
- lens-aeson
|
||||
@@ -70,16 +68,13 @@ dependencies:
|
||||
- process
|
||||
- protolude
|
||||
- safe
|
||||
- secp256k1-haskell
|
||||
- split
|
||||
- template-haskell
|
||||
- text >=0.11 && <2.0
|
||||
- time
|
||||
- transformers
|
||||
- unix
|
||||
- unordered-containers
|
||||
- vault
|
||||
- vector
|
||||
- unix
|
||||
- wai
|
||||
- wai-cors
|
||||
- wai-extra >=3.0 && <3.1
|
||||
|
||||
@@ -7,8 +7,7 @@
|
||||
-- declared in the Foundation.hs file.
|
||||
module Settings where
|
||||
|
||||
import Crypto.Hash
|
||||
import Startlude hiding (hash)
|
||||
import Startlude
|
||||
|
||||
import qualified Control.Exception as Exception
|
||||
import Data.Aeson
|
||||
@@ -50,14 +49,6 @@ instance FromJSON AppSettings where
|
||||
|
||||
return AppSettings { .. }
|
||||
|
||||
apNameFromPass :: Text -> Text
|
||||
apNameFromPass password = prefix <> toS (take 4 hashStr)
|
||||
where
|
||||
bs = encodeUtf8 password
|
||||
hashed = hash bs :: Digest SHA256
|
||||
hashStr = show hashed :: String
|
||||
prefix = "start9-"
|
||||
|
||||
-- | Raw bytes at compile time of @config/settings.yml@
|
||||
configSettingsYmlBS :: ByteString
|
||||
configSettingsYmlBS = $(embedFile configSettingsYml)
|
||||
|
||||
Reference in New Issue
Block a user