From 074718d1ab7a04119303800859220dd482cfbc79 Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Mon, 29 Aug 2011 18:26:04 +0900 Subject: test change. --- Test.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Test.hs b/Test.hs index 86ffd5d..5b6a916 100644 --- a/Test.hs +++ b/Test.hs @@ -58,7 +58,7 @@ test_lookupAviaCNAME :: IO () test_lookupAviaCNAME = do rs <- makeResolvSeed defaultResolvConf withResolver rs $ \resolver -> - DNS.lookupA resolver "ghs.google.com" ??= ["64.233.183.121"] + DNS.lookupA resolver "ghs.google.com" ??= ["72.14.203.121"] main :: IO () main = defaultMain tests -- cgit v1.2.3