From 4cfd60743626dbe8bf92df973043547a64e53f9e Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Thu, 18 Mar 2010 13:39:17 +0900 Subject: example change. --- Network/DNS.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Network') diff --git a/Network/DNS.hs b/Network/DNS.hs index 7c027f7..5d70f2e 100644 --- a/Network/DNS.hs +++ b/Network/DNS.hs @@ -11,7 +11,7 @@ import qualified Network.DNS as DNS (lookup) import Network.DNS hiding (lookup) main :: IO () - main = makeDefaultResolver >>= DNS.lookup "www.iij.ad.jp" A >>= print + main = makeDefaultResolver >>= DNS.lookup \"www.example.com\" A >>= print @ -} -- cgit v1.2.3