X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fwarnings.pm;h=0400a17527ef072575725b658cbb94da6d3f4d29;hb=4213be12d365abb31886576a59b48c4839f20a79;hp=8aa77482b20558bf7978ff94158b6a03baa416c0;hpb=6e9af7e4283affa5138ab8f50e01b3144acd68ca;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/warnings.pm b/lib/warnings.pm index 8aa7748..0400a17 100644 --- a/lib/warnings.pm +++ b/lib/warnings.pm @@ -291,7 +291,7 @@ $All = "" ; vec($All, $Offsets{'all'}, 2) = 3 ; sub Croaker { delete $Carp::CarpInternal{'warnings'}; - croak @_ ; + croak(@_); } sub bits