fix minor misuse of ok()

parrot · Jan 3, 2011 · 7dbdc4d · 7dbdc4d
1 parent ca7564b
commit 7dbdc4d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/t/dynoplibs/io.t b/t/dynoplibs/io.t
@@ -427,7 +427,7 @@ CODE
     $I0 = 4
 
     setstdin $P0
-    ok('can setstdin')
+    ok(1, 'can setstdin')
 
     $S0 = read $I0
     $I1 = tell $P0