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

[mt at alioth.debian.org]

Author: mt
Date: 2008-05-09 13:13:12 +0000 (Fri, 09 May 2008)
New Revision: 4890

Modified:
   people/michael/features/setup_harddisks_2/implementation/lib/commands.pm
Log:
more debug


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:06:10 UTC (rev 4889)
+++ people/michael/features/setup_harddisks_2/implementation/lib/commands.pm	2008-05-09 13:13:12 UTC (rev 4890)
@@ -1000,6 +1000,10 @@
   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) {
     my $all_matched = 1;
     foreach (split(/,/, $FAI::commands{$i}{pre})) {