{-# LANGUAGE TypeApplications, UndecidableInstances #-} module RenameTest where import qualified Data.Map as Map import qualified Data.Text as T import Data.Time (getCurrentTime, Day, UTCTime(..)) import Init -- persistent used to not allow types with an "Id" suffix -- this verifies that the issue is fixed type TextId = Text -- Test lower case names