From 3f223e7440d57bd8ed80d98c56f70bd5c1f10e16 Mon Sep 17 00:00:00 2001 From: Tzafrir Cohen Date: Tue, 8 Feb 2011 14:12:51 +0000 Subject: dahdi-perl: left-over $span->xpd Replace one remaining $span->{XPD} with xpd_of_span(). Signed-off-by: Tzafrir Cohen Merged revisions 9648 via svnmerge from http://svn.digium.com/svn/dahdi/tools/trunk git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/branches/2.4@9742 a0bf4364-ded3-4de4-8d8a-66a801d63aff --- xpp/perl_modules/Dahdi/Span.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/xpp/perl_modules/Dahdi/Span.pm b/xpp/perl_modules/Dahdi/Span.pm index 9dd3347..5e13f04 100644 --- a/xpp/perl_modules/Dahdi/Span.pm +++ b/xpp/perl_modules/Dahdi/Span.pm @@ -323,7 +323,7 @@ sub pri_set_fromconfig($$) { } push(@pri_specs , 'SPAN/* TE'); # Default my @patlist = ( "SPAN/" . $span->num ); - my $xpd = $span->{XPD}; + my $xpd = Dahdi::Xpp::xpd_of_span($span); if(defined $xpd) { my $xbus = $xpd->xbus; my $xbus_name = $xbus->name; -- cgit v1.2.3