From b0e565e19b134c17a36da1ac3828cb8ad48883df Mon Sep 17 00:00:00 2001
From: Asumu Takikawa <asumu@ccs.neu.edu>
Date: Fri, 1 Mar 2013 16:20:06 -0500
Subject: [PATCH] Another small contract fix

original commit: 50cd4645c187d55f466ccc3b0a0526af62f00e5a
---
 collects/net/dns.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/net/dns.rkt b/collects/net/dns.rkt
index 65fe9bdd98..322b4cd8a1 100644
--- a/collects/net/dns.rkt
+++ b/collects/net/dns.rkt
@@ -12,7 +12,7 @@
           [dns-get-name
            (-> ip-address-string? ip-address-string? string?)]
           [dns-get-mail-exchanger
-           (-> ip-address-string? ip-address-string? string?)]
+           (-> ip-address-string? string? (or/c bytes? string?))]
           [dns-find-nameserver
            (-> (or/c ip-address-string? #f))]))