diff options
Diffstat (limited to 'xpp/utils/zconf/Zaptel/Xpp.pm')
-rw-r--r-- | xpp/utils/zconf/Zaptel/Xpp.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/xpp/utils/zconf/Zaptel/Xpp.pm b/xpp/utils/zconf/Zaptel/Xpp.pm index dd1f34c..28de49d 100644 --- a/xpp/utils/zconf/Zaptel/Xpp.pm +++ b/xpp/utils/zconf/Zaptel/Xpp.pm @@ -27,8 +27,9 @@ sub xbuses { my $optsort = shift || 'SORT_NAME'; my @xbuses; + -d "/proc/xpp" or return (); open(F, "$proc_base/xbuses") || - die "$0: Failed to open $proc_base/xbuses. xpp module is loaded?\n"; + die "$0: Failed to open $proc_base/xbuses: $!\n"; while(<F>) { chomp; my ($name, @attr) = split; |