1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/fileshareset b/perl-install/standalone/fileshareset
index b5dcbfb16..9d0cb11ee 100755
--- a/perl-install/standalone/fileshareset
+++ b/perl-install/standalone/fileshareset
@@ -180,7 +180,7 @@ sub check {
 ################################################################################
 package exports;
 
-sub find {
+sub _find {
     my ($exports, $mntpoint) = @_;
     foreach (@$exports) {
 	$_->{mntpoint} eq $mntpoint and return $_;
@@ -190,7 +190,7 @@ sub find {
 
 sub add {
     my ($exports, $mntpoint) = @_;
-    find($exports, $mntpoint) and die 'add';
+    _find($exports, $mntpoint) and die 'add';
     push @$exports, my $e = { mntpoint => $mntpoint };
     $e;
 }