Merge tag 'iio-for-5.5a-take3' of https://git.kernel.org/pub/scm/linux/kernel/git...

[linux.git] / scripts / export_report.pl

diff --git a/scripts/export_report.pl b/scripts/export_report.pl
index 0f604f62f067e95660a51f0cb1cd37e6a911d1b8..548330e8c4e7a35028b7f60bf58708d02a853bd7 100755 (executable)
--- a/scripts/export_report.pl
+++ b/scripts/export_report.pl
@@ -52,13 +52,12 @@ sub usage {
 
 sub collectcfiles {
     my @file;
-    while (<.tmp_versions/*.mod>) {
-       open my $fh, '<', $_ or die "cannot open $_: $!\n";
-       push (@file,
-             grep s/\.ko/.mod.c/,      # change the suffix
-             grep m/.+\.ko/,           # find the .ko path
-             <$fh>);                   # lines in opened file
+    open my $fh, '< modules.order' or die "cannot open modules.order: $!\n";
+    while (<$fh>) {
+       s/\.ko$/.mod.c/;
+       push (@file, $_)
     }
+    close($fh);
     chomp @file;
     return @file;
 }
@@ -95,7 +94,7 @@ if (defined $opt{'o'}) {
 #
 while ( <$module_symvers> ) {
        chomp;
-       my (undef, $symbol, $module, $gpl) = split;
+       my (undef, $symbol, $namespace, $module, $gpl) = split('\t');
        $SYMBOL { $symbol } =  [ $module , "0" , $symbol, $gpl];
 }
 close($module_symvers);