From cff9d296fd1e8bb7674f74bb5a1cdbfde39428f7 Mon Sep 17 00:00:00 2001 From: Guillem Jover Date: Wed, 8 Nov 2017 17:28:49 +0100 Subject: [PATCH] TT#24097 Reorder hash assignment to make perlcritic life easier The code is correct, but perlcritic seems to have problems parsing it and confuses it with a statement separated with a comma. Change-Id: I76cd82699cffa2b1a9d938c53172f02d09f47583 --- perl/NGCP/Rtpengine.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl/NGCP/Rtpengine.pm b/perl/NGCP/Rtpengine.pm index 3c7f816c4..804c4607e 100644 --- a/perl/NGCP/Rtpengine.pm +++ b/perl/NGCP/Rtpengine.pm @@ -48,11 +48,11 @@ sub req { sub offer { my ($self, $packet) = @_; - return $self->req( { %$packet, command => 'offer' } ); + return $self->req( { command => 'offer', %$packet } ); } sub answer { my ($self, $packet) = @_; - return $self->req( { %$packet, command => 'answer' } ); + return $self->req( { command => 'answer', %$packet } ); } 1;