summaryrefslogtreecommitdiff
path: root/fml/lib/IO/Adapter
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-01-28 13:52:23 +0000
committerfukachan <fukachan>2001-01-28 13:52:23 +0000
commit1d203bf032b40e570f63328f4bc962e644a41a61 (patch)
tree3eef7b106943afea41aa3e7631d34e2a1aa0b14a /fml/lib/IO/Adapter
parent39734c89d6a96b67fdec703495cdb3bf9733e706 (diff)
downloadfml8-1d203bf032b40e570f63328f4bc962e644a41a61.tar.gz
fml8-1d203bf032b40e570f63328f4bc962e644a41a61.tar.bz2
fml8-1d203bf032b40e570f63328f4bc962e644a41a61.zip
s/member/element/g
Diffstat (limited to 'fml/lib/IO/Adapter')
-rw-r--r--fml/lib/IO/Adapter/Array.pm16
-rw-r--r--fml/lib/IO/Adapter/NIS.pm8
-rw-r--r--fml/lib/IO/Adapter/UnixGroup.pm6
3 files changed, 15 insertions, 15 deletions
diff --git a/fml/lib/IO/Adapter/Array.pm b/fml/lib/IO/Adapter/Array.pm
index 3d0fea2a..2ea8a497 100644
--- a/fml/lib/IO/Adapter/Array.pm
+++ b/fml/lib/IO/Adapter/Array.pm
@@ -75,7 +75,7 @@ $flag is "r" only now.
# flag => $flag
# _array_reference => ARRAY_REFERENCE
# }
-# Side Effects: malloc @members array
+# Side Effects: malloc @elements array
# Return Value: ARRAY REFERENCE
sub open
{
@@ -84,11 +84,11 @@ sub open
my $r_array = $self->{ _array_reference};
# malloc()
- my @members = @$r_array;
- $self->{_members} = $r_array;
- $self->{_num_members} = $#members;
- $self->{_counter} = 0;
- return defined @members ? \@members : undef;
+ my @elements = @$r_array;
+ $self->{_elements} = $r_array;
+ $self->{_num_elements} = $#elements;
+ $self->{_counter} = 0;
+ return defined @elements ? \@elements : undef;
}
@@ -116,7 +116,7 @@ sub get_next_value
{
my ($self, $args) = @_;
my $i = $self->{_counter}++;
- my $ra = $self->{_members};
+ my $ra = $self->{_elements};
defined $$ra[ $i ] ? $$ra[ $i ] : undef;
}
@@ -153,7 +153,7 @@ sub setpos
sub eof
{
my ($self) = @_;
- $self->{_counter} > $self->{_num_members} ? 1 : 0;
+ $self->{_counter} > $self->{_num_elements} ? 1 : 0;
}
diff --git a/fml/lib/IO/Adapter/NIS.pm b/fml/lib/IO/Adapter/NIS.pm
index 60a59ca3..f800b379 100644
--- a/fml/lib/IO/Adapter/NIS.pm
+++ b/fml/lib/IO/Adapter/NIS.pm
@@ -23,10 +23,10 @@ sub configure
my ($type) = ref($self) || $self;
# emulate an array on memory
- my $key = $me->{_name};
- my (@x) = split(/:/, `ypmatch $key group.byname`);
- my (@members) = split ',', $x[3];
- $me->{_array_reference} = \@members;
+ my $key = $me->{_name};
+ my (@x) = split(/:/, `ypmatch $key group.byname`);
+ my (@elements) = split ',', $x[3];
+ $me->{_array_reference} = \@elements;
}
diff --git a/fml/lib/IO/Adapter/UnixGroup.pm b/fml/lib/IO/Adapter/UnixGroup.pm
index f12e03d6..df06a1bb 100644
--- a/fml/lib/IO/Adapter/UnixGroup.pm
+++ b/fml/lib/IO/Adapter/UnixGroup.pm
@@ -23,9 +23,9 @@ sub configure
my ($type) = ref($self) || $self;
# emulate an array on memory
- my (@x) = getgrnam( $me->{_name} );
- my (@members) = split ' ', $x[3];
- $me->{_array_reference} = \@members;
+ my (@x) = getgrnam( $me->{_name} );
+ my (@elements) = split ' ', $x[3];
+ $me->{_array_reference} = \@elements;
}