| Subject: | Perltidy not properly formatting subroutine references inside subroutine execution |
| Date: | Sat, 31 May 2014 10:56:49 -0500 |
| To: | bug-Perl-Tidy [...] rt.cpan.org |
| From: | Andrew Pietila <the [...] ubernerd.us> |
Input Code:
sub startup {
my $self = shift;
$self->plugin(
'authentication' => {
'autoload_user' => 1,
'session_key' => rand(),
'load_user' => sub {
return HaloVP::Users->load(@_);
},
'validate_user' => sub {
return HaloVP::Users->login(@_);
}
}
);
}
Output Code:
sub startup {
my $self = shift;
$self->plugin(
'authentication' => {
'autoload_user' => 1,
'session_key' => rand(),
'load_user' => sub {
return HaloVP::Users->load(@_);
},
'validate_user' => sub {
return HaloVP::Users->login(@_);
}
}
);
}