diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,12 @@
 # ChangeLog for crypton-x509-store
 
+## 1.10.0
+
+* Read ML-DSA private keys
+  [#35](https://github.com/kazu-yamamoto/crypton-certificate/pull/35)
+* Follow the breaking change in `crypton-x509` 1.10.0
+  [#35](https://github.com/kazu-yamamoto/crypton-certificate/pull/35)
+
 ## 1.9.0
 
 * Using "ram" instead of "memory"
diff --git a/Data/X509/CertificateStore.hs b/Data/X509/CertificateStore.hs
--- a/Data/X509/CertificateStore.hs
+++ b/Data/X509/CertificateStore.hs
@@ -20,7 +20,6 @@
 #else
 import           Data.Monoid
 #endif
-import Control.Applicative ((<$>))
 import qualified Control.Exception as E
 import Control.Monad (filterM, mplus)
 import qualified Data.ByteString as B
@@ -33,6 +32,7 @@
     getDirectoryContents,
  )
 import System.FilePath ((</>))
+import qualified System.IO.Error as E
 
 -- | A Collection of certificate or store of certificates.
 data CertificateStore
@@ -107,7 +107,7 @@
 -- The file may contains multiple certificates
 readCertificates :: FilePath -> IO [SignedCertificate]
 readCertificates file =
-    E.catch
+    E.catchIOError
         (either (const []) (rights . map getCert) . pemParseBS <$> B.readFile file)
         skipIOError
   where
@@ -130,7 +130,7 @@
     isCert x = (not $ isPrefixOf "." x) && (not $ isHashedFile x)
 
     getDirContents =
-        E.catch
+        E.catchIOError
             (map (path </>) . filter isCert <$> getDirectoryContents path)
             emptyPaths
       where
diff --git a/Data/X509/File.hs b/Data/X509/File.hs
--- a/Data/X509/File.hs
+++ b/Data/X509/File.hs
@@ -10,14 +10,11 @@
 #define MIN_VERSION_unix(x, y, z) 0
 #endif
 
-import Control.Applicative
-import Control.Exception (Exception (..), throw)
-import Data.ASN1.BinaryEncoding
-import Data.ASN1.Encoding
+import qualified Control.Exception as E
 import Data.ASN1.Types
 import qualified Data.ByteString.Lazy as L
 import Data.Maybe
-import Data.PEM (PEM, pemContent, pemName, pemParseLBS)
+import Data.PEM (PEM, pemContent, pemParseLBS)
 import qualified Data.X509 as X509
 import Data.X509.Memory (pemToKey)
 #if defined(MIN_VERSION_unix) && MIN_VERSION_unix(2,8,0)
@@ -27,7 +24,7 @@
 newtype PEMError = PEMError {displayPEMError :: String}
     deriving (Show)
 
-instance Exception PEMError where
+instance E.Exception PEMError where
     displayException = displayPEMError
 
 readPEMs :: FilePath -> IO [PEM]
@@ -39,7 +36,7 @@
 #else
     content <- L.readFile filepath
 #endif
-    either (throw . PEMError) pure $ pemParseLBS content
+    either (E.throw . PEMError) pure $ pemParseLBS content
 
 -- | return all the signed objects in a file.
 --
diff --git a/Data/X509/Memory.hs b/Data/X509/Memory.hs
--- a/Data/X509/Memory.hs
+++ b/Data/X509/Memory.hs
@@ -76,6 +76,9 @@
         Right (k@(X509.PrivKeyX448 _), _) -> Just k
         Right (k@(X509.PrivKeyEd25519 _), _) -> Just k
         Right (k@(X509.PrivKeyEd448 _), _) -> Just k
+        Right (k@(X509.PrivKeyMLDSA44 _), _) -> Just k
+        Right (k@(X509.PrivKeyMLDSA65 _), _) -> Just k
+        Right (k@(X509.PrivKeyMLDSA87 _), _) -> Just k
         _ -> Nothing
 
 dsaFromASN1 :: [ASN1] -> Either String (DSA.KeyPair, [ASN1])
diff --git a/crypton-x509-store.cabal b/crypton-x509-store.cabal
--- a/crypton-x509-store.cabal
+++ b/crypton-x509-store.cabal
@@ -1,6 +1,6 @@
 cabal-version:      >=1.10
 name:               crypton-x509-store
-version:            1.9.0
+version:            1.10.0
 license:            BSD3
 license-file:       LICENSE
 copyright:          Vincent Hanquez <vincent@snarc.org>
@@ -33,11 +33,11 @@
         base >=3 && <5,
         bytestring,
         containers,
-        crypton >=1.1.0 && < 1.2,
+        crypton >=1.1.0 && <2.3,
         crypton-asn1-encoding >=0.10.0 && <0.11,
         crypton-asn1-types >=0.4.1 && <0.5,
         crypton-pem >=0.2.4 && <0.4,
-        crypton-x509 >=1.9.0 && <1.10,
+        crypton-x509 >=1.10 && <1.11,
         directory,
         filepath,
         mtl