[systemimager-commits] r3491 - trunk/lib/SystemImager

[finley <fi...@sy...>]

Author: finley
Date: 2006-03-30 01:28:15 -0600 (Thu, 30 Mar 2006)
New Revision: 3491

Modified:
   trunk/lib/SystemImager/UseYourOwnKernel.pm
Log:
fix a couple of minor bugs after the 'modinfo -F filename' patch.

Modified: trunk/lib/SystemImager/UseYourOwnKernel.pm
===================================================================
--- trunk/lib/SystemImager/UseYourOwnKernel.pm	2006-03-29 18:49:05 UTC (rev 3490)
+++ trunk/lib/SystemImager/UseYourOwnKernel.pm	2006-03-30 07:28:15 UTC (rev 3491)
@@ -98,7 +98,7 @@
         my @modules = get_load_ordered_list_of_running_modules();
         foreach my $module ( @modules ) {
                 print " >> insmod $module\n" if( $verbose );
-                print FILE "insmod $1\n";
+                print FILE "insmod $module\n";
         }
         close(FILE);
 
@@ -480,7 +480,8 @@
         open(MODULES,"<$file") or die("Couldn't open $file for reading.");
         while(<MODULES>) {
                 my ($module) = split;
-                chomp($module_file = `modinfo -F filename $module 2>/dev/null`);
+                chomp(my $module_file = `modinfo -F filename $module 2>/dev/null`);
+#print "X $module_file\n";
                 if ($?) {
                         print STDERR qq(WARNING: Couldn't find module "$module " (skipping it)!\n);
                         next;