Another small contract fix

original commit: 50cd4645c1
2013-03-01 16:20:06 -05:00 · 2013-03-01 16:20:06 -05:00 · b0e565e19b
commit b0e565e19b
parent e8bd0b51c6
1 changed files with 1 additions and 1 deletions
--- 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))]))