diff options
| author | fukachan <fukachan> | 2001-01-28 13:52:23 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-01-28 13:52:23 +0000 |
| commit | 1d203bf032b40e570f63328f4bc962e644a41a61 (patch) | |
| tree | 3eef7b106943afea41aa3e7631d34e2a1aa0b14a /fml/lib/IO/Adapter | |
| parent | 39734c89d6a96b67fdec703495cdb3bf9733e706 (diff) | |
| download | fml8-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.pm | 16 | ||||
| -rw-r--r-- | fml/lib/IO/Adapter/NIS.pm | 8 | ||||
| -rw-r--r-- | fml/lib/IO/Adapter/UnixGroup.pm | 6 |
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; } |
