haskell-github: patch to fix build
This commit is contained in:
parent
001776428e
commit
be8d22c05d
@ -12,6 +12,7 @@ cabal.mkDerivation (self: {
|
|||||||
hashable HTTP httpConduit httpTypes network text time
|
hashable HTTP httpConduit httpTypes network text time
|
||||||
unorderedContainers vector
|
unorderedContainers vector
|
||||||
];
|
];
|
||||||
|
patches = [ ./fix-build.patch ];
|
||||||
jailbreak = true;
|
jailbreak = true;
|
||||||
meta = {
|
meta = {
|
||||||
homepage = "https://github.com/fpco/github";
|
homepage = "https://github.com/fpco/github";
|
||||||
|
13
pkgs/development/libraries/haskell/github/fix-build.patch
Normal file
13
pkgs/development/libraries/haskell/github/fix-build.patch
Normal file
@ -0,0 +1,13 @@
|
|||||||
|
diff -ubr github-0.7.2-orig/Github/Private.hs github-0.7.2/Github/Private.hs
|
||||||
|
--- github-0.7.2-orig/Github/Private.hs 2013-12-15 19:45:00.611789227 +0100
|
||||||
|
+++ github-0.7.2/Github/Private.hs 2013-12-15 19:45:46.359954006 +0100
|
||||||
|
@@ -104,9 +104,6 @@
|
||||||
|
in Just (Data.List.takeWhile (/= '>') s')
|
||||||
|
else Nothing
|
||||||
|
|
||||||
|
-doHttps :: Method -> String -> Maybe GithubAuth
|
||||||
|
- -> Maybe (RequestBody (ResourceT IO))
|
||||||
|
- -> IO (Either E.SomeException (Response LBS.ByteString))
|
||||||
|
doHttps reqMethod url auth body = do
|
||||||
|
let reqBody = fromMaybe (RequestBodyBS $ BS.pack "") body
|
||||||
|
reqHeaders = maybe [] getOAuth auth
|
Loading…
x
Reference in New Issue
Block a user