From cf84710ff24dd09e80f9e5ecfeb16ce15137ddc3 Mon Sep 17 00:00:00 2001 From: Tzafrir Cohen Date: Sun, 6 Feb 2011 18:39:57 +0000 Subject: dahdi-perl: more left-over $span->xpd Replace the remaining $span->xpd with xpd_of_span(). Following up on r9648. git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/trunk@9731 a0bf4364-ded3-4de4-8d8a-66a801d63aff --- xpp/perl_modules/Dahdi/Chans.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'xpp/perl_modules/Dahdi/Chans.pm') diff --git a/xpp/perl_modules/Dahdi/Chans.pm b/xpp/perl_modules/Dahdi/Chans.pm index a869ae4..e045c7d 100644 --- a/xpp/perl_modules/Dahdi/Chans.pm +++ b/xpp/perl_modules/Dahdi/Chans.pm @@ -229,7 +229,7 @@ sub battery($) { 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 @@ sub blink($$) { 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; -- cgit v1.2.3