diff options
author | Kazu Yamamoto <kazu@iij.ad.jp> | 2011-08-29 18:26:04 +0900 |
---|---|---|
committer | Kazu Yamamoto <kazu@iij.ad.jp> | 2011-08-29 18:26:04 +0900 |
commit | 074718d1ab7a04119303800859220dd482cfbc79 (patch) | |
tree | 2681d0da45f3121f681c4f32d43e349e3194455b /Test.hs | |
parent | c8549adbbc36f5a4efcce0c49f07ed079f8ae4ae (diff) |
test change.
Diffstat (limited to 'Test.hs')
-rw-r--r-- | Test.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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 |