X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FOpcode%2FOpcode.t;h=9f2748cc06a45bf362b911af9ed6bfa5a96534aa;hb=bd5cf8491554ab1313db72afbf9e7bc1debe967c;hp=a785fce48b66cbd8614c6c1d8e49ac33239408a2;hpb=b695f709e8a342e35e482b0437eb6cdacdc58b6b;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/Opcode/Opcode.t b/ext/Opcode/Opcode.t
index a785fce..9f2748c 100755
--- a/ext/Opcode/Opcode.t
+++ b/ext/Opcode/Opcode.t
@@ -87,7 +87,7 @@ print verify_opset($s1) && !verify_opset(42) ? "ok $t\n":"not ok $t\n"; $t++;
 
 opmask_add(opset(qw(fileno)));	# add to global op_mask
 print eval 'fileno STDOUT' ? "not ok $t\n" : "ok $t\n";	$t++; # fail
-print $@ =~ /fileno trapped/ ? "ok $t\n" : "not ok $t\n# $@\n"; $t++;
+print $@ =~ /'fileno' trapped/ ? "ok $t\n" : "not ok $t\n# $@\n"; $t++;
 
 # --- check use of bit vector ops on opsets