Drop legacy module

src/Database/PostgreSQL/PG.purs

@@ -30,8 +30,6 @@ type PG a
 hoistPG :: ∀ a m. MonadAff m => MonadError PGError m => PG a -> m a
 hoistPG m = liftAff m >>= either throwError pure
 
--- | Run an action with a connection. The connection is released to the pool
--- | when the action returns.
 withClient ::
   ∀ a m.
   MonadError PGError m =>
@@ -58,12 +56,6 @@ withConnection ::
   m a
 withConnection f p k = withClient f p (lcmap fromClient k)
 
--- | TODO: Update docs
--- | Run an action within a transaction. The transaction is committed if the
--- | action returns cleanly, and rolled back if the action throws (either a
--- | `PGError` or a JavaScript exception in PG context). If you want to
--- | change the transaction mode, issue a separate `SET TRANSACTION` statement
--- | within the transaction.
 withTransaction ::
   ∀ a m.
   MonadAff m =>

src/Database/PostgreSQL/RowList.purs

@@ -1,22 +0,0 @@
-module Data.PostgreSQL.RowList where
-
--- import Prim.RowList (Cons, Nil) as RowList
--- import Prim.RowList (kind RowList)
--- 
--- infixl 10 type RowList.Cons as :
--- 
--- type Apply (f :: RowList Type -> RowList Type) (a ∷ RowList Type) = f a
--- 
--- infixr 0 type Apply as $
--- 
--- type R = "test" : Int $ "fest" : String $ RowList.Nil
--- 
--- instance fromSQLRowRow0 :: FromSQLRow RowList.Nil where
---   fromSQLRow [] =
---     pure Row0
---   fromSQLRow xs = Left $ "Row has " <> show n <> " fields, expecting 0."
---     where n = Array.length xs
--- 
--- instance toSQLRowRow0 :: ToSQLRow Row0 where
---   toSQLRow Row0 = []
--- -- | A row with 1 field.