module Biz.Auth
  ( Error (..),
    Password,
    Username,
  ) where

import Data.ByteString (ByteString)
import Data.Text (Text)
import Miso.String

data Error
  = BadUsername
  | BadPassword

type Password = MisoString
type Username = MisoString