Porting/corelist-perldelta.pl - Remove trailing whitespace

[perl5.git] / Porting / corelist-perldelta.pl

diff --git a/Porting/corelist-perldelta.pl b/Porting/corelist-perldelta.pl
index 022b427..b22c75a 100755 (executable)
--- a/Porting/corelist-perldelta.pl
+++ b/Porting/corelist-perldelta.pl
@@ -26,7 +26,7 @@ The part to check the diff wants to be run with a Perl that has an up-to-date
 L<Module::CoreList>, but needs the outside L<Algorithm::Diff>.
 
 Ideally, the program will be split into two separate programs, one
 L<Module::CoreList>, but needs the outside L<Algorithm::Diff>.
 
 Ideally, the program will be split into two separate programs, one

-to generate the text and one to show the diff between the 
+to generate the text and one to show the diff between the

 corelist sections of the last perldelta and the next perldelta.
 
 =cut
 corelist sections of the last perldelta and the next perldelta.
 
 =cut


@@ -350,7 +350,7 @@ sub do_check {
       sub {
         my ($el) = @_;
         my ($heading) = $el->[0] =~ /^head(\d)$/;
       sub {
         my ($el) = @_;
         my ($heading) = $el->[0] =~ /^head(\d)$/;

-        my $f = $heading && $el->[2] =~ /^$section/;        
+        my $f = $heading && $el->[2] =~ /^$section/;

         $level = $heading if $f && !$level;
         return $f;
       },
         $level = $heading if $f && !$level;
         return $f;
       },