diff options
author | Tzafrir Cohen <tzafrir.cohen@xorcom.com> | 2009-08-13 21:40:01 +0000 |
---|---|---|
committer | Tzafrir Cohen <tzafrir.cohen@xorcom.com> | 2009-08-13 21:40:01 +0000 |
commit | be6a656b38fbae3c80767894119106a7bed16af7 (patch) | |
tree | 1530d6712732bbdde946af5c826f027c983cadb9 | |
parent | c8006f106b247790660f247fddc29b624a89d647 (diff) |
dahdi-perl: don't re-append '@' when testing the Astribank connector string
xpp rev: 7291
git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/trunk@7000 a0bf4364-ded3-4de4-8d8a-66a801d63aff
-rw-r--r-- | xpp/perl_modules/Dahdi/Xpp.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/xpp/perl_modules/Dahdi/Xpp.pm b/xpp/perl_modules/Dahdi/Xpp.pm index f9e62a5..7ac574b 100644 --- a/xpp/perl_modules/Dahdi/Xpp.pm +++ b/xpp/perl_modules/Dahdi/Xpp.pm @@ -206,10 +206,9 @@ sub add_xpporder(@) { # Overrides from config file foreach my $xbus (@xbuses) { my $label = $xbus->label; - my $connector = '@' . $xbus->connector; my $val; $val = $order{$label}; - $val = $order{$connector} unless defined $val; + $val = $order{$xbus->connector} unless defined $val; $xbus->{XPPORDER} = $val if defined $val; } } |