diff --git a/System/Entropy.hs b/System/Entropy.hs
--- a/System/Entropy.hs
+++ b/System/Entropy.hs
@@ -76,7 +76,7 @@
 
 cryptGenRandom :: Word32 -> Int -> IO B.ByteString
 cryptGenRandom h i = 
-   B.create i $ \c_buffer -> do
+   BI.create i $ \c_buffer -> do
       stat <- c_cryptGenRandom (fromIntegral h) (fromIntegral i) c_buffer
       if (toBool stat)
          then return ()
diff --git a/entropy.cabal b/entropy.cabal
--- a/entropy.cabal
+++ b/entropy.cabal
@@ -1,5 +1,5 @@
 name:           entropy
-version:        0.2
+version:        0.2.1
 license:        BSD3
 license-file:   LICENSE
 copyright:      Thomas DuBuisson <thomas.dubuisson@gmail.com>