[svn-commits] tzafrir: branch tools/tzafrir/sysfs r5978 - /tools/team/tzafrir/sysfs/xpp/per...

[SVN commits to the Digium repositories]

Author: tzafrir
Date: Wed Feb  4 19:08:42 2009
New Revision: 5978

URL: http://svn.digium.com/svn-view/dahdi?view=rev&rev=5978
Log:
Add method span_of_node() that constructs a Dahdi::Span object
from a sysfs device node (directory).

Modified:
    tools/team/tzafrir/sysfs/xpp/perl_modules/Dahdi.pm

Modified: tools/team/tzafrir/sysfs/xpp/perl_modules/Dahdi.pm
URL: http://svn.digium.com/svn-view/dahdi/tools/team/tzafrir/sysfs/xpp/perl_modules/Dahdi.pm?view=diff&rev=5978&r1=5977&r2=5978
==============================================================================
--- tools/team/tzafrir/sysfs/xpp/perl_modules/Dahdi.pm (original)
+++ tools/team/tzafrir/sysfs/xpp/perl_modules/Dahdi.pm Wed Feb  4 19:08:42 2009
@@ -62,6 +62,17 @@
 	return @spans;
 }
 
+=head1 span_of_node()
+
+Returns a single span object for a given sysfs node (directory)
+
+=cut
+
+sub span_of_node($) {
+	my $span = Dahdi::Span->new($_[0]);
+	return $span;
+}
+
 =head1 SEE ALSO
 
 Span objects: L<Dahdi::Span>.