From 61d0e47cd038f25157e48385fc080d0d374b214d Mon Sep 17 00:00:00 2001 From: dummy Date: Tue, 14 Oct 2014 02:07:57 +0000 Subject: [PATCH] support Android cert store Android has only hashsed cert files. See https://github.com/vincenthz/hs-certificate/issues/19 --- System/X509/Unix.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/System/X509/Unix.hs b/System/X509/Unix.hs index 9df3331..a30da26 100644 --- a/System/X509/Unix.hs +++ b/System/X509/Unix.hs @@ -56,7 +56,7 @@ listDirectoryCerts path = do && isDigit (s !! 9) && (s !! 8) == '.' && all isHexDigit (take 8 s) - isCert x = (not $ isPrefixOf "." x) && (not $ isHashedFile x) + isCert x = (not $ isPrefixOf "." x) getDirContents = E.catch (Just <$> getDirectoryContents path) emptyPaths where emptyPaths :: E.IOException -> IO (Maybe [FilePath]) -- 1.7.10.4