Remove debugging statement
commit9a6b2be5b060038ea4e3c09a0d0651921e13f5c4
authorLeon P Smith <leon@melding-monads.com>
dateThu 4 Jul 2013, 08:43 (13 years ago)
parentb5e7a21
src/Database/PostgreSQL/Simple/Copy.hs−1
@@ -201,7 +201,6 @@ getCopyCommandTag :: B.ByteString -> PQ.Connection -> IO Int64
201201getCopyCommandTag funcName pqconn = do
202202 result <- maybe (fail errCmdStatus) return =<< PQ.getResult pqconn
203203 cmdStat <- maybe (fail errCmdStatus) return =<< PQ.cmdStatus result
204− print cmdStat
205204 let rowCount = P.string "COPY " *> (P.decimal <* P.endOfInput)
206205 <|> (P.endOfInput *> pure 0)
207206 case P.parseOnly rowCount cmdStat of