git.iko.soy/typeable/postgresql-simple
on master help sign in
Use toException, not the SomeException data constructor
a8f6a90Leon P Smith
src/Database/PostgreSQL/Simple/Internal.hs+1−1
compare with master
unifiedsplit
@@ -496,7 +496,7 @@ conversionMap :: (Ok a -> Ok b) -> Conversion a -> Conversion b
496conversionMap f m = Conversion $ \conn -> f <$> runConversion m conn
496conversionMap f m = Conversion $ \conn -> f <$> runConversion m conn
497
497
498conversionError :: Exception err => err -> Conversion a
498conversionError :: Exception err => err -> Conversion a
499−conversionError err = Conversion $ \_ -> return (Errors [SomeException err])
499+conversionError err = Conversion $ \_ -> return (Errors [toException err])
500
500
501newTempName :: Connection -> IO Query
501newTempName :: Connection -> IO Query
502newTempName Connection{..} = do
502newTempName Connection{..} = do