Merge 5b39454 into 87c67d0

lib/Syntax/Keyword/Gather.pm

@@ -79,8 +79,8 @@ or to use the stuff that L<Sub::Exporter> gives us, try
 
  # this is a silly idea
  use syntax gather => {
-   gather => { -as => 'bake' },
-   take   => { -as => 'cake' },
+    gather => { -as => 'bake' },
+    take   => { -as => 'cake' },
  };
 
  my @vals = bake { cake (1...10) };
@@ -215,14 +215,14 @@ first line they have in common. We could gather the lines like this:
     }
  }
 
-If you like it really short, you can also gather-take $_ magically:
+If you like it really short, you can also C<gather>/C<take> $_ magically:
 
-my @numbers_with_two = gather {
+ my @numbers_with_two = gather {
     for (1..20) {
-        take if /2/
+       take if /2/
     }
-};
-# @numbers_with_two contains 2, 12, 20
+ };
+ # @numbers_with_two contains 2, 12, 20
 
 Be aware that $_ in Perl5 is a global variable rather than the
 current topic like in Perl6.
@@ -239,14 +239,8 @@ This module was forked from Damian Conway's L<Perl6::Gather> for a few reasons.
 
 =item ~ doesn't overload to mean string context
 
-=item to no longer takes the current topic ($_)
-
 =back
 
-The last item is actually due to an unintended side-effect of the fact that if
-C<take> has an array of zero length it takes $_, which is surprising at the very
-least.  I'll fix that issue if I can.
-
 =head1 BUGS AND IRRITATIONS
 
 It would be nice to be able to code the default case as: