X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fmultiline-proto.t;h=f6daf8a8dd560981ed8e8b38c3f1645a7cbd1cd1;hb=f283a13f6101d4ac9d27d64f49a4608fc58d8ff7;hp=b549313e7cfbc237797d1a6f967207d829910e53;hpb=7e30ce83b281f112233e5a03e72082986e4148dd;p=p5sagit%2FDevel-Declare.git diff --git a/t/multiline-proto.t b/t/multiline-proto.t index b549313..f6daf8a 100644 --- a/t/multiline-proto.t +++ b/t/multiline-proto.t @@ -21,4 +21,4 @@ use Devel::Declare fun => [ DECLARE_PROTO, \&handle_fun ]; my $foo = fun ($a, $b) { "woot" }; -is($foo->(), '$a, $b: woot', 'proto declarator ok'); +is($foo->(), "\$a,\n\$b: woot", 'proto declarator ok');