X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2Fwarnings%2Fop;h=9b20a8c256b1eb2e4f17ea1a8e0f9c9c8892eb44;hb=80a5d8e74b5512d4ab704d0e83466ae41247ce55;hp=7833562273ffb8e0dac644a176d8fe3cec9f4d5d;hpb=004283b80f6094bb85aba6f48a74e3c5c34ea24f;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/lib/warnings/op b/t/lib/warnings/op
index 7833562..9b20a8c 100644
--- a/t/lib/warnings/op
+++ b/t/lib/warnings/op
@@ -775,7 +775,7 @@ no warnings 'redefine' ;
 sub fred () { 1 }
 *fred = sub () { 2 };
 EXPECT
-Constant subroutine fred redefined at - line 4.
+Constant subroutine main::fred redefined at - line 4.
 ########
 # op.c
 use warnings 'redefine' ;