persistent-sql-lifted-0.1.0.0: library/Database/Persist/Sql/Lifted/HasSqlBackend.hs

module Database.Persist.Sql.Lifted.HasSqlBackend
  ( HasSqlBackend (..)
  ) where

import Prelude

import Database.Persist.Sql (SqlBackend)

class HasSqlBackend a where
  getSqlBackend :: a -> SqlBackend

instance HasSqlBackend SqlBackend where
  getSqlBackend = id