X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F11-wrap.t;h=7e013235733bd79b42ad8110beee09d77f3f2a3f;hb=92b328c090598b186ee6dd5168ca4b5047a834c9;hp=47fd20ecbc587f536cf2fb8e17b5dbac7b2b0dac;hpb=4e977a0b1db65e44cf4c6184792208a7930c34f4;p=perl%2Fmodules%2FSub-Prototype-Util.git diff --git a/t/11-wrap.t b/t/11-wrap.t index 47fd20e..7e01323 100644 --- a/t/11-wrap.t +++ b/t/11-wrap.t @@ -132,4 +132,4 @@ if ($^V ge v5.10.0) { } eval { wrap { 'main::dummy' => '\[@%]' }, ref => 'shift' }; -like($@, qr/to\s+shift\s+must\s+be\s+array/, 'invalid eval code croaks'); +like($@, qr/to\s+shift\s+must\s+be\s+array +\([\w ]+\) +at\s+\Q$0\E/, 'invalid eval code croaks');