dahdi_perl: Use $Dahdi::sys_base for sysfs pathes
Signed-off-by: Tzafrir Cohen <tzafrir.cohen@xorcom.com> git-svn-id: http://svn.astersk.org/svn/dahdi/tools/trunk@10267 17933a7a-c749-41c5-a318-cba88f637d49
This commit is contained in:
parent
a81a43c9b6
commit
2457399d92
@ -203,7 +203,7 @@ sub scan_devices($) {
|
||||
$pci_devs{$name}{DRIVER} = '';
|
||||
}
|
||||
|
||||
while(</sys/bus/pci/drivers/*/[0-9]*>) {
|
||||
while(<$Dahdi::sys_base/bus/pci/drivers/*/[0-9]*>) {
|
||||
m,^(.*?)/([^/]+)/([^/]+)$,;
|
||||
my $prefix = $1;
|
||||
my $drvname = $2;
|
||||
|
Loading…
Reference in New Issue
Block a user