From 687a9e6fa2f60f07fa9126504ebde02cf905aaf6 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 29 Nov 2001 16:28:41 +0000
Subject: - allow root to export everything - remove empty mntpoint (from smb)

---
 perl-install/standalone/fileshareset | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/standalone/fileshareset')

diff --git a/perl-install/standalone/fileshareset b/perl-install/standalone/fileshareset
index 4a0ecc78a..e2185b07a 100755
--- a/perl-install/standalone/fileshareset
+++ b/perl-install/standalone/fileshareset
@@ -91,11 +91,11 @@ if ($0 =~ /fileshareset/) {
 	$export->update_server;
     }
 }
-my @mntpoints = uniq(map { map { $_->{mntpoint} } @$_ } @exports);
+my @mntpoints = grep {$_} uniq(map { map { $_->{mntpoint} } @$_ } @exports);
 print "$_\n" foreach grep { own($_) } @mntpoints;
 
 
-sub own { (stat($_[0]))[4] == $uid }
+sub own { $uid == 0 || (stat($_[0]))[4] == $uid }
 
 sub verify_mntpoint {
     local ($_) = @_;
-- 
cgit v1.2.1