summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xperl-install/standalone/fileshareset4
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;
}