diff options
-rwxr-xr-x | perl-install/standalone/lsnetdrake | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/standalone/lsnetdrake b/perl-install/standalone/lsnetdrake index 9865cee27..f08008aa4 100755 --- a/perl-install/standalone/lsnetdrake +++ b/perl-install/standalone/lsnetdrake @@ -1,6 +1,7 @@ #!/usr/bin/perl use lib qw(/usr/lib/libDrakX); +use standalone; use network::nfs; use network::smb; @@ -18,7 +19,7 @@ push @l, network::smb->new if $smb; foreach my $class (@l) { foreach my $server (sort_names($class->find_servers)) { - foreach (sort_names($class->find_exports($server))) { + foreach (sort_names(eval { $class->find_exports($server) })) { print $class->to_fullstring($_), "\n"; } } |