dandri/simplex-chat
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2026-10-06 18:38:34 +00:00
Code Issues Packages Projects Releases Wiki Activity

self-review iteration 3

Browse Source
This commit is contained in:
Alain Brenzikofer
2026-09-24 15:47:36 +02:00
parent 68c84a9e75
commit 24ef8bf1f5
11 changed files with 119 additions and 119 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Chat/Wallet.hs
+1 -2
View File
@@ -23,7 +23,6 @@ import qualified Data.Aeson.TH as JQ
import Data.Bifunctor (bimap, first)
import qualified Data.ByteArray as BA
import qualified Data.ByteArray.Encoding as BAE
import Data.ByteString (ByteString)
import Data.Text (Text)
import Data.Text.Encoding (decodeLatin1)
import Data.Word (Word32)
@@ -69,7 +68,7 @@ masterStrength = B39.MS256
newSeedEntropy :: TVar ChaChaDRG -> STM BA.ScrubbedBytes
newSeedEntropy g = B39.mnemonicToEntropy <$> B39.randomMnemonic masterStrength g
entropyFromMnemonic :: ByteString -> Either WalletError BA.ScrubbedBytes
entropyFromMnemonic :: Text -> Either WalletError BA.ScrubbedBytes
entropyFromMnemonic phrase = case B39.parseMnemonic phrase of
Right m | length (B39.mnemonicWords m) == B39.strengthWordCount masterStrength ->
Right $ B39.mnemonicToEntropy m