X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FDNS.hs;h=b8e9cd0521e6baec631c56da2d4753e531e2ffc1;hb=99d975fadeb1b9485180d6c7cd45ec2c7dcfcdc4;hp=3c89ff4a78a423de3b31848470d4b82165d88ae7;hpb=e862342c38e41176a7ab300b6d7ed03cf0ffd6b2;p=haeredes.git

diff --git a/src/DNS.hs b/src/DNS.hs
index 3c89ff4..b8e9cd0 100644
--- a/src/DNS.hs
+++ b/src/DNS.hs
@@ -31,9 +31,9 @@ type LookupResult = (Domain, Either DNSError [Domain])
 --   Examples:
 --
 --   >>> resolve_address "example.com"
---   Right [93.184.216.119]
---   >>> resolve_address "93.184.216.119"
---   Right [93.184.216.119]
+--   Right [93.184.216.34]
+--   >>> resolve_address "93.184.216.34"
+--   Right [93.184.216.34]
 --
 resolve_address :: String -> IO (Either DNSError [IPv4])
 resolve_address s =