diff --git a/src/Database/Esqueleto/Internal/Language.hs b/src/Database/Esqueleto/Internal/Language.hs index 02f9a8f..9fa9688 100644 --- a/src/Database/Esqueleto/Internal/Language.hs +++ b/src/Database/Esqueleto/Internal/Language.hs @@ -12,7 +12,7 @@ import Database.Persist.Store -- | Finally tagless representation of Esqueleto's EDSL. class (Functor query, Applicative query, Monad query) => Esqueleto query expr backend | query -> expr backend, expr -> query backend where - -- | Single entity version of 'from'. + -- | (Internal) Single entity version of 'from'. fromSingle :: ( PersistEntity val , PersistEntityBackend val ~ backend) => query (expr (Entity val))