yesod-transloadit-0.7.1.0: src/Yesod/Transloadit/Internal.hs

module Yesod.Transloadit.Internal where

import           Data.Text

csrfMatches :: Text -> Text -> Bool
csrfMatches x y = x == y && x /= mempty