concurrent-dns-cache 0.1.2 → 0.1.3
raw patch · 2 files changed
+3/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- Network/DNS/Cache.hs +2/−2
- concurrent-dns-cache.cabal +1/−1
Network/DNS/Cache.hs view
@@ -217,7 +217,7 @@ eans <- resolv n resolvers dom return $ case eans of Left err -> Left err- Right ans -> fromDNSFormat ans getHostAddressandTTL+ Right ans -> fromDNSMessage ans getHostAddressandTTL where n = cacheNofServers cache seeds = cacheSeeds cache@@ -228,7 +228,7 @@ hostAddressandTTL r = (toAddr r, rrttl r) getHostAddressandTTL = map hostAddressandTTL . filter isA . answer -resolv :: Int -> [Resolver] -> Domain -> IO (Either DNSError DNSFormat)+resolv :: Int -> [Resolver] -> Domain -> IO (Either DNSError DNSMessage) resolv 1 resolvers dom = lookupRaw (head resolvers) dom A resolv _ resolvers dom = do asyncs <- mapM async actions
concurrent-dns-cache.cabal view
@@ -1,5 +1,5 @@ Name: concurrent-dns-cache-Version: 0.1.2+Version: 0.1.3 Author: Kazu Yamamoto <kazu@iij.ad.jp> Maintainer: Kazu Yamamoto <kazu@iij.ad.jp> License: BSD3