Permalink
Browse files

Compare strings with is() instead of ok()

  • Loading branch information...
potyl committed Feb 18, 2012
1 parent de17df7 commit ae058acdff200e0d8dd71ea3a3247f9aebca41bc
Showing with 3 additions and 3 deletions.
  1. +3 −3 t/dns.t
View
@@ -65,9 +65,9 @@ sub main {
# Check that the cache as a DNS record
ok(pop @{ $cached }, "IP address is true");
- ok($cached->[0] eq $host, "Response packet host matches");
- ok($cached->[1] eq 'a', "Response packet record type matches");
- ok($cached->[2] eq 'in', "Response packet record class matches");
+ is($cached->[0], $host, "Response packet host matches");
+ is($cached->[1], 'a', "Response packet record type matches");
+ is($cached->[2], 'in', "Response packet record class matches");
return 0;
}

0 comments on commit ae058ac

Please sign in to comment.