FGCOM/dahdi-tools
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

xpp: pri_termtype: match complete SPAN patterns

Browse Source 
Match complete span patterns, to avoid pattern 'SPAN/1' from matching
e.g. span 12 (SPAN/12).

Signed-off-by: Tzafrir Cohen <tzafrir.cohen@xorcom.com>

git-svn-id: http://svn.astersk.org/svn/dahdi/tools/trunk@10101 17933a7a-c749-41c5-a318-cba88f637d49
This commit is contained in:
Tzafrir Cohen 2011-08-09 13:11:20 +00:00
parent bad2f86c11
commit 2061c6c359
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
xpp/perl_modules/Dahdi/Span.pm
View File

@ -368,7 +368,7 @@ SPEC:
#print STDERR "match: $match\n"; #print STDERR "match: $match\n";
foreach my $pattern (@patlist) { foreach my $pattern (@patlist) {
#print STDERR "testmatch: $pattern =~ $match\n"; #print STDERR "testmatch: $pattern =~ $match\n";
if($pattern =~ $match) { if($pattern =~ /^$match$/) {
#print STDERR "MATCH '$pattern' ~ '$match' termtype=$termtype\n"; #print STDERR "MATCH '$pattern' ~ '$match' termtype=$termtype\n";
$match_termtype = $termtype; $match_termtype = $termtype;
last SPEC; last SPEC;