diff -ru haskell-rsa-1.0.6.1.orig/Codec/Crypto/RSA.hs haskell-rsa-1.0.6.1/Codec/Crypto/RSA.hs
--- haskell-rsa-1.0.6.1.orig/Codec/Crypto/RSA.hs	2011-06-25 12:28:07.000000000 -0700
+++ haskell-rsa-1.0.6.1/Codec/Crypto/RSA.hs	2011-09-04 09:53:33.390387169 -0700
@@ -573,13 +573,6 @@
 chunkify len bstr 
   | BS.length bstr <= len = [bstr]
   | otherwise             = (BS.take len bstr):(chunkify len $ BS.drop len bstr)
- 
-instance Random Word8 where
-  randomR (a,b) g = let aI::Int = fromIntegral a 
-                        bI::Int = fromIntegral b
-                        (x, g') = randomR (aI, bI) g
-                    in (fromIntegral x, g')
-  random          = randomR (minBound, maxBound)
 
 generate_random_bytestring :: RandomGen g => g -> Int64 -> (ByteString, g)
 generate_random_bytestring g 0 = (BS.empty, g)
