X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fdefaults.t;fp=t%2Fdefaults.t;h=7dd885cf8fe7f982c62c82ec8b17402841251251;hb=e158cf8f49978f42fb2380d3f84c5df963a39a3f;hp=fc771c3dc212e20f9b36a41539c245f07ec6855c;hpb=8c79ea4a9df54fc083be365d107dd81036057864;p=p5sagit%2FFunction-Parameters.git diff --git a/t/defaults.t b/t/defaults.t index fc771c3..7dd885c 100644 --- a/t/defaults.t +++ b/t/defaults.t @@ -101,7 +101,7 @@ is eval('fun ($x, %y = ()) {}'), undef; like $@, qr/default value/; is eval('nofun ($x = 42) {}'), undef; -like $@, qr/nofun.*unexpected.*=.*parameter/; +like $@, qr/nofun.*default argument/; {