more t/op/sort.t tests

[p5sagit/p5-mst-13.2.git] / t / op / magic.t

diff --git a/t/op/magic.t b/t/op/magic.t
index b43f71c..b46dade 100755 (executable)
--- a/t/op/magic.t
+++ b/t/op/magic.t
@@ -30,7 +30,7 @@ system './perl', '-e', <<'END';
            print "ok 3\n";
        }
        else {
-           print "not ok 3 $a\n";
+           print "not ok 3 ($x @_)\n";
        }
     }