9 lines
210 B
Haskell
9 lines
210 B
Haskell
{-# LANGUAGE TypeFamilies #-}
|
|
module Yesod.Contrib.Persist where
|
|
|
|
import Yesod
|
|
|
|
class YesodPersist y where
|
|
type YesodDB y :: (* -> *) -> * -> *
|
|
runDB :: YesodDB y (GHandler sub y) a -> GHandler sub y a
|