diff --git a/src/Certificate.hs b/src/Certificate.hs
--- a/src/Certificate.hs
+++ b/src/Certificate.hs
@@ -210,7 +210,8 @@
     when (Validate `elem` opts) $ do
         let cc = CertificateChain (rights objs)
         store  <- getSystemCertificateStore
-        failed <- validate defaultHooks validationChecks store (maybe "" id fqhn) cc
+        failed <- validate HashSHA1 defaultHooks validationChecks store (exceptionValidationCache [])
+                        (maybe ("", "") (\f -> (f,"")) fqhn) cc
         if failed /= []
             then putStrLn ("validation failed: " ++ show failed)
             else putStrLn "validation success"
diff --git a/x509-util.cabal b/x509-util.cabal
--- a/x509-util.cabal
+++ b/x509-util.cabal
@@ -1,5 +1,5 @@
 Name:                x509-util
-Version:             1.4.3
+Version:             1.5.0
 Description:         utility to parse, show, validate, sign and produce X509 certificates and chain.
 License:             BSD3
 License-file:        LICENSE
@@ -24,7 +24,7 @@
                    , x509 >= 1.4.7
                    , x509-store
                    , x509-system
-                   , x509-validation >= 1.4.8
+                   , x509-validation >= 1.5.0
                    , asn1-types >= 0.2
                    , asn1-encoding
                    , pem