[Pkg-haskell-commits] darcs: cabal-debian: Now really add the patch.

[Sven Bartscher]

Tue Aug  5 12:37:24 UTC 2014  Sven Bartscher <sven.bartscher at weltraumschlangen.de>
  * Now really add the patch.
  Now (hopefully) really ready to release 4.15-1

    A ./patches/depuppercase.patch

Tue Aug  5 12:37:24 UTC 2014  Sven Bartscher <sven.bartscher at weltraumschlangen.de>
  * Now really add the patch.
  Now (hopefully) really ready to release 4.15-1
diff -rN -u old-cabal-debian/patches/depuppercase.patch new-cabal-debian/patches/depuppercase.patch
--- old-cabal-debian/patches/depuppercase.patch	1970-01-01 00:00:00.000000000 +0000
+++ new-cabal-debian/patches/depuppercase.patch	2014-08-05 12:38:18.272475046 +0000
@@ -0,0 +1,25 @@
+Description: Maps dependencies to lowercase.
+Author: Max Kirillov <max at max630.net>
+Reviewed-by: Sven Bartscher <sven.bartscher at weltraumschlangen.de>
+Last-Update: 2014-07-30
+Forwarded: Yes
+--- a/src/Debian/Debianize/BuildDependencies.hs
++++ b/src/Debian/Debianize/BuildDependencies.hs
+@@ -7,7 +7,7 @@
+ 
+ import Control.Monad.State (MonadState(get))
+ import Control.Monad.Trans (MonadIO)
+-import Data.Char (isSpace)
++import Data.Char (isSpace, toLower)
+ import Data.Function (on)
+ import Data.Lens.Lazy (access, getL)
+ import Data.List as List (filter, map, minimumBy, nub)
+@@ -75,7 +75,7 @@
+     where
+       fixDeps :: Atoms -> [String] -> Relations
+       fixDeps atoms xs =
+-          concatMap (\ cab -> fromMaybe [[D.Rel (D.BinPkgName ("lib" ++ cab ++ "-dev")) Nothing Nothing]]
++          concatMap (\ cab -> fromMaybe [[D.Rel (D.BinPkgName ("lib" ++ map toLower cab ++ "-dev")) Nothing Nothing]]
+                                         (Map.lookup cab (getL T.extraLibMap atoms))) xs
+ 
+ -- The haskell-cdbs package contains the hlibrary.mk file with