* [gentoo-commits] repo/gentoo:master commit in: dev-haskell/hdbc-postgresql/files/
@ 2016-08-03 7:36 Patrice Clement
0 siblings, 0 replies; only message in thread
From: Patrice Clement @ 2016-08-03 7:36 UTC (permalink / raw
To: gentoo-commits
commit: 4ca2514ffd41f20b7c8a1bdb305f924950fae9de
Author: Michael Mair-Keimberger (asterix) <m.mairkeimberger <AT> gmail <DOT> com>
AuthorDate: Wed Jul 27 16:58:47 2016 +0000
Commit: Patrice Clement <monsieurp <AT> gentoo <DOT> org>
CommitDate: Wed Aug 3 07:21:54 2016 +0000
URL: https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=4ca2514f
dev-haskell/hdbc-postgresql: remove unused patch
Signed-off-by: Patrice Clement <monsieurp <AT> gentoo.org>
.../files/HDBC-postgresql-2.3.2.1-ghc-7.6.patch | 53 ----------------------
1 file changed, 53 deletions(-)
diff --git a/dev-haskell/hdbc-postgresql/files/HDBC-postgresql-2.3.2.1-ghc-7.6.patch b/dev-haskell/hdbc-postgresql/files/HDBC-postgresql-2.3.2.1-ghc-7.6.patch
deleted file mode 100644
index 2f81f35..0000000
--- a/dev-haskell/hdbc-postgresql/files/HDBC-postgresql-2.3.2.1-ghc-7.6.patch
+++ /dev/null
@@ -1,53 +0,0 @@
---- HDBC-postgresql-2.3.2.1-orig/testsrc/TestSbasics.hs 2012-03-04 04:08:01.000000000 +1100
-+++ HDBC-postgresql-2.3.2.1/testsrc/TestSbasics.hs 2012-10-13 11:08:27.482597846 +1100
-@@ -1,10 +1,14 @@
-+{-# LANGUAGE CPP, ScopedTypeVariables #-}
- module TestSbasics(tests) where
- import Test.HUnit
- import Data.List
- import Database.HDBC
- import TestUtils
- import System.IO
--import Control.Exception hiding (catch)
-+#if !MIN_VERSION_base(4,6,0)
-+import Prelude hiding (catch)
-+#endif
-+import Control.Exception
-
- openClosedb = sqlTestCase $
- do dbh <- connectDB
-@@ -142,7 +146,7 @@
- -- Let's try a rollback.
- catch (withTransaction dbh (\_ -> do sExecuteMany sth rows
- fail "Foo"))
-- (\_ -> return ())
-+ (\(_::IOException) -> return ())
- sExecute qrysth []
- sFetchAllRows qrysth >>= (assertEqual "rollback" [[Just "0"]])
-
---- HDBC-postgresql-2.3.2.1-orig/testsrc/Testbasics.hs 2012-03-04 04:08:01.000000000 +1100
-+++ HDBC-postgresql-2.3.2.1/testsrc/Testbasics.hs 2012-10-13 11:07:43.622396904 +1100
-@@ -1,9 +1,13 @@
-+{-# LANGUAGE CPP, ScopedTypeVariables #-}
- module Testbasics(tests) where
- import Test.HUnit
- import Database.HDBC
- import TestUtils
- import System.IO
--import Control.Exception hiding (catch)
-+#if !MIN_VERSION_base(4,6,0)
-+import Prelude hiding (catch)
-+#endif
-+import Control.Exception
-
- openClosedb = sqlTestCase $
- do dbh <- connectDB
-@@ -140,7 +144,7 @@
- -- Let's try a rollback.
- catch (withTransaction dbh (\_ -> do executeMany sth rows
- fail "Foo"))
-- (\_ -> return ())
-+ (\(_::IOException) -> return ())
- execute qrysth []
- fetchAllRows qrysth >>= (assertEqual "rollback" [[SqlString "0"]])
-
^ permalink raw reply related [flat|nested] only message in thread
only message in thread, other threads:[~2016-08-03 7:36 UTC | newest]
Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2016-08-03 7:36 [gentoo-commits] repo/gentoo:master commit in: dev-haskell/hdbc-postgresql/files/ Patrice Clement
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox