Don't use cmp_ok

[perl/modules/Scope-Context.git] / t / 14-cmp.t

diff --git a/t/14-cmp.t b/t/14-cmp.t
index 9313d935df4eb0b51d11aac3116b9a2b0de02cf2..8c22c47cdbe743e3b054e9d8037e6f01f00fb62f 100644 (file)
--- a/t/14-cmp.t
+++ b/t/14-cmp.t
@@ -12,8 +12,8 @@ use Scope::Context;
  {
   my $block = Scope::Context->new;
   my $up = $block->up;
-  cmp_ok $up,    '==', $sc, '$up == $sc';
-  cmp_ok $block, '!=', $sc, '$block != $sc';
+  ok $up    == $sc, '$up == $sc';
+  ok $block != $sc, '$block != $sc';
  }
 }