From b2e74c4437d18b90698813b8e6a82e9c9d43943e Mon Sep 17 00:00:00 2001 From: Andreas Granig Date: Tue, 14 Jul 2015 10:38:12 +0200 Subject: [PATCH] MT#13919 Properly strip in-between dashes from mac Change-Id: Iedb72e5124c69706b1da4bcb493c8f2f3ea31a42 --- lib/NGCP/Panel/Controller/Device.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/NGCP/Panel/Controller/Device.pm b/lib/NGCP/Panel/Controller/Device.pm index 8729b0ad73..04ce6a2aa3 100644 --- a/lib/NGCP/Panel/Controller/Device.pm +++ b/lib/NGCP/Panel/Controller/Device.pm @@ -1195,7 +1195,7 @@ sub dev_field_config :Chained('/') :PathPart('device/autoprov/config') :Args() { $id =~ s/^([^\=]+)\=0$/$1/; $id = lc $id; $id =~ s/\-[a-z]+$//; - $id =~ s/\-$//g; + $id =~ s/\-//g; =pod my $yealink_key;