From 094878194250aa5f3a5f76447aa5a195c9f7a7dc Mon Sep 17 00:00:00 2001 From: Tzafrir Cohen Date: Mon, 9 Mar 2009 16:30:36 +0000 Subject: Fix detection of channels of dynamic spans in Dahdi::Chans Fix the pattern detection of channels belonging to dynamic (dahdi_dynamic) spans in perl programs that use Dahdi::Chans (e.g.: lsdahdi) (closes issue #14630) Reported by: tamiel Patches: 20090309-perl5-Dahdi-Chans.diff uploaded by tamiel (license 712) git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/trunk@6110 a0bf4364-ded3-4de4-8d8a-66a801d63aff --- xpp/perl_modules/Dahdi/Chans.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/xpp/perl_modules/Dahdi/Chans.pm b/xpp/perl_modules/Dahdi/Chans.pm index 6e31a10..b578d95 100644 --- a/xpp/perl_modules/Dahdi/Chans.pm +++ b/xpp/perl_modules/Dahdi/Chans.pm @@ -155,6 +155,9 @@ sub new($$$$$$) { # ZTHFC: HFC-s single-port card (zaphfc/vzaphfc) # ztqoz: qozap (Junghanns) multi-port HFC card $type = "BRI"; + } elsif ($fqn =~ m{\bDYN/.*}) { + # DYN : Dynamic span (TDMOE) + $type = "DYN" } elsif ($fqn =~ m{\bztgsm/.*}) { # Junghanns GSM card $type = "GSM"; -- cgit v1.2.3