[Fai-commit] r4892 - people/michael/features/setup_harddisks_2/implementation/lib

mt at alioth.debian.org mt at alioth.debian.org
Fri May 9 13:33:29 UTC 2008


Author: mt
Date: 2008-05-09 13:33:20 +0000 (Fri, 09 May 2008)
New Revision: 4892

Modified:
   people/michael/features/setup_harddisks_2/implementation/lib/commands.pm
Log:
ok, first error should be fixed, let's see what else is there...


Modified: people/michael/features/setup_harddisks_2/implementation/lib/commands.pm
===================================================================
--- people/michael/features/setup_harddisks_2/implementation/lib/commands.pm	2008-05-09 13:27:32 UTC (rev 4891)
+++ people/michael/features/setup_harddisks_2/implementation/lib/commands.pm	2008-05-09 13:33:20 UTC (rev 4892)
@@ -1000,12 +1000,7 @@
   my $i = 1;
   my $pushed = -1;
 
-  print "n_c_i is" . $FAI::n_c_i . "\n";
-  print "last added: " . $FAI::commands{$FAI::n_c_i - 1}{cmd} . "\n";
-  print "last added: " . $FAI::commands{$FAI::n_c_i - 1}{pre} . "\n";
-  print "last added: " . $FAI::commands{$FAI::n_c_i - 1}{post} . "\n";
   while ($i < $FAI::n_c_i) {
-    print "I:$i N_C_I:" . $FAI::n_c_i . "\n";
     my $all_matched = 1;
     foreach (split(/,/, $FAI::commands{$i}{pre})) {
       next if scalar(grep(m{^$_$}, @pre_deps));
@@ -1013,10 +1008,9 @@
       last;
     }
     if ($all_matched) {
+      defined($FAI::commands{$i}{post}) and push @pre_deps, split(/,/, $FAI::commands{$i}{post});
       $pushed = -1;
       $i++;
-      defined($FAI::commands{$i}{post}) or print "No post for $i, " .  $FAI::commands{$i}{cmd} . "\n";
-      defined($FAI::commands{$i}{post}) and push @pre_deps, split(/,/, $FAI::commands{$i}{post});
       next;
     }
     if (-1 == $pushed) {




More information about the Fai-commit mailing list