From da10e87bd6c69c4374de470b7b286c36c823fdc2 Mon Sep 17 00:00:00 2001 From: Tzafrir Cohen Date: Thu, 19 Jun 2008 17:34:36 +0000 Subject: XPP tools rename: part 2. Removed obsolete astribank_hook (not needed) and print_modes (moved to kernel). git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/trunk@4416 a0bf4364-ded3-4de4-8d8a-66a801d63aff --- xpp/lsdahdi | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) (limited to 'xpp/lsdahdi') diff --git a/xpp/lsdahdi b/xpp/lsdahdi index a836d98..5611ddd 100755 --- a/xpp/lsdahdi +++ b/xpp/lsdahdi @@ -9,18 +9,18 @@ # use strict; use File::Basename; -BEGIN { my $dir = dirname($0); unshift(@INC, "$dir", "$dir/zconf"); } +BEGIN { my $dir = dirname($0); unshift(@INC, "$dir", "$dir/perl_modules"); } -use Zaptel; -use Zaptel::Span; -use Zaptel::Xpp; -use Zaptel::Xpp::Xbus; -use Zaptel::Xpp::Xpd; +use Dahdi; +use Dahdi::Span; +use Dahdi::Xpp; +use Dahdi::Xpp::Xbus; +use Dahdi::Xpp::Xpd; -my @xbuses = Zaptel::Xpp::xbuses("SORT_CONNECTOR"); +my @xbuses = Dahdi::Xpp::xbuses("SORT_CONNECTOR"); my @xpds = map { $_->xpds } @xbuses; -foreach my $span (Zaptel::spans()) { +foreach my $span (Dahdi::spans()) { my $spanno = $span->num; my $xpd = $span->xpd; my @lines; @@ -46,11 +46,11 @@ __END__ =head1 NAME -lszaptel - List all zaptel channels with their types and spans. +lsdahdi - List all dahdi channels with their types and spans. =head1 SYNOPSIS -lszaptel +lsdahdi =head1 DESCRIPTION @@ -103,6 +103,6 @@ and the second one is the signalling (if set). =head1 FILES -lszaptel is a somewhat glorified 'cat /proc/zaptel/*' . Unlike that +lsdahdi is a somewhat glorified 'cat /proc/dahdi/*' . Unlike that command, it sorts the spans with the proper order. It also formats the output slightly differently. -- cgit v1.2.3