[svn-commits] tzafrir: tools/trunk r9648 - /tools/trunk/xpp/perl_modules/Dahdi/Span.pm

[SVN commits to the Digium repositories]

Author: tzafrir
Date: Thu Jan 20 12:06:38 2011
New Revision: 9648

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

Replace one remaining $span->{XPD} with xpd_of_span().

Signed-off-by: Tzafrir Cohen <tzafrir.cohen at xorcom.com>

Modified:
    tools/trunk/xpp/perl_modules/Dahdi/Span.pm

Modified: tools/trunk/xpp/perl_modules/Dahdi/Span.pm
URL: http://svnview.digium.com/svn/dahdi/tools/trunk/xpp/perl_modules/Dahdi/Span.pm?view=diff&rev=9648&r1=9647&r2=9648
==============================================================================
--- tools/trunk/xpp/perl_modules/Dahdi/Span.pm (original)
+++ tools/trunk/xpp/perl_modules/Dahdi/Span.pm Thu Jan 20 12:06:38 2011
@@ -323,7 +323,7 @@
 	}
 	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;