t/op/each.t: Remove trailing whitespace

As suggested in #214 by oodler577.
atoomic · Oct 10, 2020 · 863b9d3 · 863b9d3
1 parent 0611b2c
commit 863b9d3
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/t/op/each.t b/t/op/each.t
@@ -8,7 +8,7 @@ BEGIN {
 
 plan tests => 59;
 
-my %h; 
+my %h;
 $h{'abc'} = 'ABC';
 $h{'def'} = 'DEF';
 $h{'jkl','mno'} = "JKL\034MNO";
@@ -167,7 +167,7 @@ my $ol;
 cmp_ok ($ol, '>', 3, "check encoding on EBCDIC");
 %u = ($d => "downgrade");
 for (keys %u) {
-    is (length, 3, "check length"); 
+    is (length, 3, "check length");
     is ($_, pack("U*", 0xe3, 0x81, 0xAF), "check value");
 }
 {
@@ -182,11 +182,11 @@ for (keys %u) {
     my $b1 = "\xC4\x80";          # 0xC4 0x80 is U+0100 in UTF-8
 
     $u{$u0} = 1;
-    $u{$b0} = 2; 
+    $u{$b0} = 2;
     $u{$u1} = 3;
     $u{$b1} = 4;
 
-    is(scalar keys %u, 4, "four different Unicode keys"); 
+    is(scalar keys %u, 4, "four different Unicode keys");
     is($u{$u0}, 1, "U+00FF        -> 1");
     is($u{$b0}, 2, "U+00C3 U+00BF -> 2");
     is($u{$u1}, 3, "U+0100        -> 3 ");
@@ -217,7 +217,7 @@ for my $k (qw(each keys values)) {
     is($hsv,$count,"Got the count of keys from %foo in scalar assignment context - my");
     my @arr=%foo&&%foo;
     is(@arr,10,"Got expected number of elements in list context - my");
-}    
+}
 {
     our %foo=(1..10);
     my ($k,$v);
@@ -236,7 +236,7 @@ for my $k (qw(each keys values)) {
     is($hsv,$count,"Got the count of keys from %foo in scalar assignment context - our");
     my @arr=%foo&&%foo;
     is(@arr,10,"Got expected number of elements in list context - our");
-}    
+}
 {
     # make sure a deleted active iterator gets freed timely, even if the
     # hash is otherwise empty