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