From acc489c88eadf298a8b9318f24e3302bf376e676 Mon Sep 17 00:00:00 2001
From: Richard Fuchs <rfuchs@sipwise.com>
Date: Wed, 30 Jun 2021 12:03:25 -0400
Subject: [PATCH] TT#91151 add --label option to ng-client script

Change-Id: Ie1e98e4e8410f5c72d1801164bec98b274f5b374
---
 utils/rtpengine-ng-client | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/utils/rtpengine-ng-client b/utils/rtpengine-ng-client
index 8d66fb0e7..b0e68f530 100755
--- a/utils/rtpengine-ng-client
+++ b/utils/rtpengine-ng-client
@@ -92,13 +92,14 @@ GetOptions(
 	'reorder-codecs'		=> \$options{'reorder codecs'},
 	'media-echo=s'			=> \$options{'media echo'},
 	'pierce-NAT'			=> \$options{'pierce NAT'},
+	'label=s'			=> \$options{'label'},
 ) or die;
 
 my $cmd = shift(@ARGV) or die;
 
 my %packet = (command => $cmd);
 
-for my $x (split(/,/, 'from-tag,to-tag,call-id,transport protocol,media address,ICE,address family,DTLS,via-branch,media address,ptime,xmlrpc-callback,metadata,address,file,db-id,code,DTLS-fingerprint,ICE-lite,media echo')) {
+for my $x (split(/,/, 'from-tag,to-tag,call-id,transport protocol,media address,ICE,address family,DTLS,via-branch,media address,ptime,xmlrpc-callback,metadata,address,file,db-id,code,DTLS-fingerprint,ICE-lite,media echo,label')) {
 	defined($options{$x}) and $packet{$x} = \$options{$x};
 }
 for my $x (split(/,/, 'TOS,delete-delay')) {