diff --git a/ChangeLog.md b/ChangeLog.md
new file mode 100644
--- /dev/null
+++ b/ChangeLog.md
@@ -0,0 +1,5 @@
+# ChangeLog for casa-types
+
+## 0.0.2
+
+* Move to base16-bytestring 1.0
diff --git a/casa-types.cabal b/casa-types.cabal
--- a/casa-types.cabal
+++ b/casa-types.cabal
@@ -8,8 +8,10 @@
 license:        BSD3
 license-file:   LICENSE
 category: Development
-version:        0.0.1
+version:        0.0.2
 build-type:     Simple
+extra-source-files:
+  ChangeLog.md
 
 library
   exposed-modules:
@@ -19,10 +21,10 @@
   default-language: Haskell2010
   ghc-options: -Wall
   build-depends:
-       base >= 4.5 && < 5
+      base < 10
     , bytestring
     , attoparsec
-    , base16-bytestring
+    , base16-bytestring >= 1
     , text
     , hashable
     , aeson
diff --git a/src/Casa/Types.hs b/src/Casa/Types.hs
--- a/src/Casa/Types.hs
+++ b/src/Casa/Types.hs
@@ -9,7 +9,6 @@
 import qualified Data.Attoparsec.ByteString as Atto.B
 import qualified Data.Attoparsec.Text as Atto.T
 import           Data.ByteString (ByteString)
-import qualified Data.ByteString as S
 import qualified Data.ByteString.Base16 as Hex
 import qualified Data.ByteString.Builder as S
 import           Data.Hashable
@@ -49,8 +48,8 @@
        BlobKey
        (do bytes <- Atto.T.take 64
            case Hex.decode (T.encodeUtf8 bytes) of
-             (result, wrong) | S.null wrong -> pure result
-             _ -> fail "Invalid hex key."))
+             Right result -> pure result
+             Left _ -> fail "Invalid hex key."))
 
 -- | Parse a blob key in binary format.
 blobKeyBinaryParser :: Atto.B.Parser BlobKey