Skip to content

Commit

Permalink
[setting] replace self.list with @.list in some places
Browse files Browse the repository at this point in the history
  • Loading branch information
moritz committed Mar 9, 2009
1 parent d16d3c3 commit 960d251
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions src/setting/Any-list.pm
Expand Up @@ -9,7 +9,7 @@ class Any is also {
return gather {
my $arity = &expr.arity || 1;
my @args;
for self.list {
for @.list {
@args.push($_);
if (@args == $arity) {
take &expr(|@args);
Expand All @@ -36,11 +36,11 @@ class Any is also {
multi method pairs(*@indices) {
gather {
if @indices {
for (self.list.keys Z self.list) -> $key, $val is rw {
for (@.list.keys Z @.list) -> $key, $val is rw {
take ($key => $val) if $key ~~ any(@indices);
}
} else {
for (self.list.keys Z self.list) -> $key, $val is rw {
for (@.list.keys Z @.list) -> $key, $val is rw {
take ($key => $val)
}
}
Expand Down

0 comments on commit 960d251

Please sign in to comment.