Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Remove unneeded lexicals
  • Loading branch information
lizmat committed Apr 18, 2014
1 parent 99ff702 commit 3922904
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions src/core/SupplyOperations.pm
Expand Up @@ -80,7 +80,7 @@ my class SupplyOperations is repr('Uninstantiable') {
$a => sub (\val) { side_effect(val); $res.more(val) }
}
}

method grep(Supply $a, &filter) {
my class GrepSupply does Supply does PrivatePublishing {
has $!source;
Expand All @@ -90,7 +90,7 @@ my class SupplyOperations is repr('Uninstantiable') {

method tap(|c) {
my $sub = self.Supply::tap(|c);
my $tap = $!source.tap( -> \val {
$!source.tap( -> \val {
if (&!filter(val)) { self!more(val) }
},
done => { self!done(); },
Expand All @@ -111,7 +111,7 @@ my class SupplyOperations is repr('Uninstantiable') {

method tap(|c) {
my $sub = self.Supply::tap(|c);
my $tap = $!source.tap( -> \val {
$!source.tap( -> \val {
self!more(&!mapper(val))
},
done => { self!done(); },
Expand Down

0 comments on commit 3922904

Please sign in to comment.