diff options
Diffstat (limited to 'xpp/perl_modules/Dahdi/Span.pm')
-rw-r--r-- | xpp/perl_modules/Dahdi/Span.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/xpp/perl_modules/Dahdi/Span.pm b/xpp/perl_modules/Dahdi/Span.pm index 5e13f04..fd169b7 100644 --- a/xpp/perl_modules/Dahdi/Span.pm +++ b/xpp/perl_modules/Dahdi/Span.pm @@ -349,7 +349,7 @@ SPEC: #print STDERR "match: $match\n"; foreach my $pattern (@patlist) { #print STDERR "testmatch: $pattern =~ $match\n"; - if($pattern =~ $match) { + if($pattern =~ /^$match$/) { #print STDERR "MATCH '$pattern' ~ '$match' termtype=$termtype\n"; $match_termtype = $termtype; last SPEC; |