diff options
Diffstat (limited to 'xpp/utils/zconf/Zaptel')
-rw-r--r-- | xpp/utils/zconf/Zaptel/Span.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/xpp/utils/zconf/Zaptel/Span.pm b/xpp/utils/zconf/Zaptel/Span.pm index eacac8b..951f603 100644 --- a/xpp/utils/zconf/Zaptel/Span.pm +++ b/xpp/utils/zconf/Zaptel/Span.pm @@ -101,9 +101,11 @@ sub new($$) { push(@{$self->{CHANS}}, $c); } close F; + + $self->{YELLOW} = undef; + $self->{CRC4} = undef; if($self->is_bri()) { $self->{CODING} = 'ami'; - $self->{YELLOW} = undef; $self->{DCHAN} = ($self->chans())[$self->{DCHAN_IDX}]; $self->{BCHANS} = [ ($self->chans())[@{$self->{BCHAN_LIST}}] ]; # Infer some info from channel name: @@ -125,6 +127,7 @@ sub new($$) { $self->{CODING} = 'hdb3'; $self->{FRAMING} = 'ccs'; $self->{SWITCHTYPE} = 'euroisdn'; + $self->{CRC4} = 'crc4'; } elsif($self->{PROTO} eq 'T1') { $self->{CODING} = 'b8zs'; $self->{FRAMING} = 'esf'; @@ -132,7 +135,6 @@ sub new($$) { } else { die "'$self->{PROTO}' unsupported yet"; } - $self->{YELLOW} = undef; $self->{SIGNALLING} = ($self->{TERMTYPE} eq 'NT') ? $ZAPPRI_NET : $ZAPPRI_CPE ; } return $self; |