From 8ec8da0491ad89604700b3e29a227966f6d84ba1 Mon Sep 17 00:00:00 2001 From: Perl Tidy Date: Wed, 5 Dec 2018 15:38:52 -0500 Subject: no bug - reformat all the code using the new perltidy rules --- extensions/BzAPI/lib/Resources/User.pm | 75 +++++++++++++++------------------- 1 file changed, 33 insertions(+), 42 deletions(-) (limited to 'extensions/BzAPI/lib/Resources/User.pm') diff --git a/extensions/BzAPI/lib/Resources/User.pm b/extensions/BzAPI/lib/Resources/User.pm index 550a61d28..7a7a183a9 100644 --- a/extensions/BzAPI/lib/Resources/User.pm +++ b/extensions/BzAPI/lib/Resources/User.pm @@ -14,67 +14,58 @@ use warnings; use Bugzilla::Extension::BzAPI::Util; sub rest_handlers { - my $rest_handlers = [ - qr{/user$}, { - GET => { - response => \&get_users, - }, - }, - qr{/user/([^/]+)$}, { - GET => { - response => \&get_user, - }, - } - ]; - return $rest_handlers; + my $rest_handlers = [ + qr{/user$}, {GET => {response => \&get_users,},}, + qr{/user/([^/]+)$}, {GET => {response => \&get_user,},} + ]; + return $rest_handlers; } sub get_users { - my ($result) = @_; - my $rpc = Bugzilla->request_cache->{bzapi_rpc}; - my $params = Bugzilla->input_params; + my ($result) = @_; + my $rpc = Bugzilla->request_cache->{bzapi_rpc}; + my $params = Bugzilla->input_params; - return if !exists $$result->{users}; + return if !exists $$result->{users}; - my @users; - foreach my $user (@{$$result->{users}}) { - my $object = Bugzilla::User->new( - { id => $user->{id}, cache => 1 }); + my @users; + foreach my $user (@{$$result->{users}}) { + my $object = Bugzilla::User->new({id => $user->{id}, cache => 1}); - $user = fix_user($user, $object); + $user = fix_user($user, $object); - # Use userid instead of email for 'ref' for /user calls - $user->{'ref'} = $rpc->type('string', ref_urlbase . "/user/" . $object->id); + # Use userid instead of email for 'ref' for /user calls + $user->{'ref'} = $rpc->type('string', ref_urlbase . "/user/" . $object->id); - # Emails are not filtered even if user is not logged in - $user->{name} = $rpc->type('string', $object->login); + # Emails are not filtered even if user is not logged in + $user->{name} = $rpc->type('string', $object->login); - push(@users, filter($params, $user)); - } + push(@users, filter($params, $user)); + } - $$result->{users} = \@users; + $$result->{users} = \@users; } sub get_user { - my ($result) = @_; - my $rpc = Bugzilla->request_cache->{bzapi_rpc}; - my $params = Bugzilla->input_params; + my ($result) = @_; + my $rpc = Bugzilla->request_cache->{bzapi_rpc}; + my $params = Bugzilla->input_params; - return if !exists $$result->{users}; - my $user = $$result->{users}->[0] || return; - my $object = Bugzilla::User->new({ id => $user->{id}, cache => 1 }); + return if !exists $$result->{users}; + my $user = $$result->{users}->[0] || return; + my $object = Bugzilla::User->new({id => $user->{id}, cache => 1}); - $user = fix_user($user, $object); + $user = fix_user($user, $object); - # Use userid instead of email for 'ref' for /user calls - $user->{'ref'} = $rpc->type('string', ref_urlbase . "/user/" . $object->id); + # Use userid instead of email for 'ref' for /user calls + $user->{'ref'} = $rpc->type('string', ref_urlbase . "/user/" . $object->id); - # Emails are not filtered even if user is not logged in - $user->{name} = $rpc->type('string', $object->login); + # Emails are not filtered even if user is not logged in + $user->{name} = $rpc->type('string', $object->login); - $user = filter($params, $user); + $user = filter($params, $user); - $$result = $user; + $$result = $user; } 1; -- cgit v1.2.3-24-g4f1b