1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/standalone/fileshareset b/perl-install/standalone/fileshareset
index 4e426caaa..f6fd20e40 100755
--- a/perl-install/standalone/fileshareset
+++ b/perl-install/standalone/fileshareset
@@ -169,9 +169,7 @@ sub find {
 
 sub add {
     my ($exports, $mntpoint) = @_;
-    foreach (@$exports) {
-	$_->{mntpoint} eq $mntpoint and die 'add';
-    }
+    find($exports, $mntpoint) and die 'add';
     push @$exports, my $e = { mntpoint => $mntpoint };
     $e;
 }