sync with upstream rpm.org:

"perl.{req,prov} whitespace, backslash and paren cleanups."
(Ville Skyttä, 2010-01-24)

1 files changed, 4 insertions, 4 deletions

diff --git a/perl.req b/perl.req
index cf63adf..1b44ae1 100755
--- a/perl.req
+++ b/perl.req
@@ -44,10 +44,10 @@ if ("@ARGV") {
     process_file($_);
   }
 } else {
-  
+
   # notice we are passed a list of filenames NOT as common in unix the
   # contents of the file.
-  
+
   foreach (<>) {
     chomp $_;
     process_file($_) if -f $_;
@@ -107,7 +107,7 @@ sub process_file {
     if ( (m/^=(over)/) .. (m/^=(back)/) ) {
       next;
     }
-    
+
     # skip the data section
     if (m/^__(DATA|END)__$/) {
       last;
@@ -198,7 +198,7 @@ sub process_file {
 
       $module =~ s/\.pm$//;
 
-      # some perl programmers write 'require URI/URL;' when 
+      # some perl programmers write 'require URI/URL;' when
       # they mean 'require URI::URL;'
 
       $module =~ s/\//::/;