[Pkg-haskell-commits] darcs: hoauth: Patch around changed RSA API

[Joachim Breitner]

Sun May 24 07:51:55 UTC 2015  Joachim Breitner <mail at joachim-breitner.de>
  * Patch around changed RSA API 

    M ./changelog +1
    A ./patches/
    A ./patches/new-RSA
    A ./patches/series

Sun May 24 07:51:55 UTC 2015  Joachim Breitner <mail at joachim-breitner.de>
  * Patch around changed RSA API 
diff -rN -u old-hoauth/changelog new-hoauth/changelog
--- old-hoauth/changelog	2015-05-24 07:55:25.162208815 +0000
+++ new-hoauth/changelog	2015-05-24 07:55:25.166208919 +0000
@@ -2,6 +2,7 @@
 
   * Adjust watch file to new hackage layout
   * Depend on haskell-devscripts 0.9
+  * Patch around changed RSA API 
 
  -- Joachim Breitner <nomeata at debian.org>  Sat, 05 Oct 2013 18:22:26 +0200
 
diff -rN -u old-hoauth/patches/new-RSA new-hoauth/patches/new-RSA
--- old-hoauth/patches/new-RSA	1970-01-01 00:00:00.000000000 +0000
+++ new-hoauth/patches/new-RSA	2015-05-24 07:55:25.166208919 +0000
@@ -0,0 +1,13 @@
+Index: hoauth-0.3.5/src/main/haskell/Network/OAuth/Consumer.hs
+===================================================================
+--- hoauth-0.3.5.orig/src/main/haskell/Network/OAuth/Consumer.hs	2015-05-24 09:48:16.055373381 +0200
++++ hoauth-0.3.5/src/main/haskell/Network/OAuth/Consumer.hs	2015-05-24 09:49:03.352548741 +0200
+@@ -185,7 +185,7 @@
+ signature m token req = case m
+                         of PLAINTEXT -> key
+                            HMACSHA1  -> b64encode $ S.bytestringDigest (S.hmacSha1 (bsencode key) (bsencode text))
+-                           RSASHA1 k -> b64encode $ R.rsassa_pkcs1_v1_5_sign R.ha_SHA1 k (bsencode text)
++                           RSASHA1 k -> b64encode $ R.rsassa_pkcs1_v1_5_sign R.hashSHA1 k (bsencode text)
+ 
+   where bsencode  = B.pack . map (fromIntegral.ord)
+         b64encode = B64.encode . B.unpack
diff -rN -u old-hoauth/patches/series new-hoauth/patches/series
--- old-hoauth/patches/series	1970-01-01 00:00:00.000000000 +0000
+++ new-hoauth/patches/series	2015-05-24 07:55:25.166208919 +0000
@@ -0,0 +1 @@
+new-RSA