itIsInDomainWithPort =
  let Just url = importURL "http://a.b.c:10/test" in
  True @=? isInDomain "a.b.c:10" url
itIsInDomainWithPort =
  let Just url = importURL "http://a.b.c:10/test" in
  True @=? isInDomain "a.b.c:10" url
itIsInDomainWithPort =
  let Just url = importURL "http://a.b.c:10/test" in
  True @=? isInDomain "a.b.c:10" url