diff --git a/base58-bytestring.cabal b/base58-bytestring.cabal
--- a/base58-bytestring.cabal
+++ b/base58-bytestring.cabal
@@ -1,5 +1,5 @@
 name:                base58-bytestring
-version:             0.0.2
+version:             0.0.3
 synopsis:            Implementation of BASE58 transcoding for ByteStrings
 
 description: Implementation of BASE58 transcoding copy-pasted from
diff --git a/src/Data/ByteString/Base58.hs b/src/Data/ByteString/Base58.hs
--- a/src/Data/ByteString/Base58.hs
+++ b/src/Data/ByteString/Base58.hs
@@ -16,7 +16,6 @@
 import Data.Bits
 import Data.ByteString ( ByteString )
 import Data.Char (chr, ord)
-import Data.Map ( Map )
 import Data.Maybe
 import Data.String
 import Data.Typeable ( Typeable )
@@ -27,7 +26,6 @@
 import qualified Data.ByteString as BS
 import qualified Data.ByteString.Char8 as BC
 import qualified Data.List as L
-import qualified Data.Map.Strict as M
 
 newtype Alphabet =
     Alphabet