diff -up Perl-Tidy-Sweetened-1.07/t/perl-signatures.t.orig Perl-Tidy-Sweetened-1.07/t/perl-signatures.t --- Perl-Tidy-Sweetened-1.07/t/perl-signatures.t.orig 2016-03-11 10:36:19.809540565 +0100 +++ Perl-Tidy-Sweetened-1.07/t/perl-signatures.t 2016-03-11 10:37:35.533205735 +0100 @@ -73,13 +73,13 @@ sub foo($x, $y={}){ | sub foo ==== 5.20 annoymous sub =============================================== $j->map( | $j->map( - sub($x,$ = 0) { | sub($x,$ = 0) { + sub($x,$ = 0) { | sub ( $x, $ = 0 ) { $x->method(); | $x->method(); } | } ); | ); ==== 5.20 annoymous sub 2 =============================================== -my $x = sub($x,$ = 0) { | my $x = sub($x,$ = 0) { +my $x = sub($x,$ = 0) { | my $x = sub ( $x, $ = 0 ) { $x->method(); | $x->method(); }; | };