summaryrefslogtreecommitdiff
path: root/src/Erebos/UUID.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Erebos/UUID.hs')
-rw-r--r--src/Erebos/UUID.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Erebos/UUID.hs b/src/Erebos/UUID.hs
index 128d450..582bab2 100644
--- a/src/Erebos/UUID.hs
+++ b/src/Erebos/UUID.hs
@@ -6,14 +6,14 @@ module Erebos.UUID (
nextRandom,
) where
-import Crypto.Random.Entropy
-
import Data.Bits
import Data.ByteString qualified as BS
import Data.ByteString.Lazy qualified as BSL
import Data.Maybe
import Data.UUID.Types
+import Crypto
+
nextRandom :: IO UUID
nextRandom = do
[ b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, ba, bb, bc, bd, be, bf ]