diff --git a/src/Control/Auth.hs b/src/Control/Auth.hs
index 8341dc9..6c15b4c 100644
--- a/src/Control/Auth.hs
+++ b/src/Control/Auth.hs
@@ -21,7 +21,7 @@ import Data.Text.Encoding
 
 import Types
 import Model
-import Util.Random
+import Util.Crypto
 
 authGet
   :: TicketRequest
diff --git a/src/Model/Auth.hs b/src/Model/Auth.hs
index ca30a4c..891daee 100644
--- a/src/Model/Auth.hs
+++ b/src/Model/Auth.hs
@@ -29,7 +29,6 @@ import qualified Data.Set as S
 import Data.Time.Clock
 
 import Data.ByteString as B (ByteString)
-import qualified Data.ByteString.Base64 as B64
 
 import Opaleye hiding (null)
 
@@ -38,7 +37,7 @@ import Opaleye hiding (null)
 import Types.Auth
 import Types.Reader
 import Classes
-import Util.Random
+import Util.Crypto
 
 initToken :: PGS.Query
 initToken = mconcat