[svn-commits] tzafrir: tools/trunk r9731 - in /tools/trunk/xpp/perl_modules/Dahdi: ./ Confi...

SVN commits to the Digium repositories svn-commits at lists.digium.com
Sun Feb 6 12:40:03 CST 2011


Author: tzafrir
Date: Sun Feb  6 12:39:57 2011
New Revision: 9731

URL: http://svnview.digium.com/svn/dahdi?view=rev&rev=9731
Log:
dahdi-perl: more left-over $span->xpd

Replace the remaining $span->xpd with xpd_of_span().

Following up on r9648.

Modified:
    tools/trunk/xpp/perl_modules/Dahdi/Chans.pm
    tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm

Modified: tools/trunk/xpp/perl_modules/Dahdi/Chans.pm
URL: http://svnview.digium.com/svn/dahdi/tools/trunk/xpp/perl_modules/Dahdi/Chans.pm?view=diff&rev=9731&r1=9730&r2=9731
==============================================================================
--- tools/trunk/xpp/perl_modules/Dahdi/Chans.pm (original)
+++ tools/trunk/xpp/perl_modules/Dahdi/Chans.pm Sun Feb  6 12:39:57 2011
@@ -229,7 +229,7 @@
 	return undef unless defined $self->type && $self->type eq 'FXO';
 	return $self->{BATTERY} if defined $self->{BATTERY};
 
-	my $xpd = $span->xpd;
+	my $xpd = Dahdi::Xpp::xpd_of_span($span);
 	my $index = $self->index;
 	return undef if !$xpd;
 
@@ -251,7 +251,7 @@
 	my $on = shift;
 	my $span = $self->span or die;
 
-	my $xpd = $span->xpd;
+	my $xpd = Dahdi::Xpp::xpd_of_span($span);
 	my $index = $self->index;
 	return undef if !$xpd;
 

Modified: tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm
URL: http://svnview.digium.com/svn/dahdi/tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm?view=diff&rev=9731&r1=9730&r2=9731
==============================================================================
--- tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm (original)
+++ tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm Sun Feb  6 12:39:57 2011
@@ -137,7 +137,7 @@
 	if ($span->is_bri()) {
 		my $use_bristuff = 0;
 		my $cfg_hardhdlc = $gconfig->{'bri_hardhdlc'};
-		my $xpd = $span->xpd();
+		my $xpd = Dahdi::Xpp::xpd_of_span($span);
 		if(!defined($cfg_hardhdlc) || $cfg_hardhdlc =~ /AUTO/i) {
 			# Autodetect
 			if(defined($xpd)) {




More information about the svn-commits mailing list