Permalink
Browse files

General cleanup

  • Loading branch information...
1 parent 192ace6 commit ab60b7f5015c332ec51c94c4047efe07bdcd1c5a @snarkyboojum snarkyboojum committed Jun 15, 2010
Showing with 1 addition and 2 deletions.
  1. +1 −2 lib/MIME/Base64/Perl.pm6
@@ -20,8 +20,7 @@ class MIME::Base64::Perl {
for @packs -> $p {
my @binary = $p.comb(/./);
my @bases = 2 X** ((^$p.chars).reverse);
-
- my $index = ( [+] (@binary >>*<< @bases) );
+ my $index = ( [+] (@binary >>*<< @bases) );
$output ~= @table[$index];
}

0 comments on commit ab60b7f

Please sign in to comment.