[Fai-commit] r3608 - people/michael/features/setup_harddisks_2/implementation

[fai-commit at lists.alioth.debian.org]

Author: michael-guest
Date: 2006-07-22 11:07:22 +0000 (Sat, 22 Jul 2006)
New Revision: 3608

Modified:
   people/michael/features/setup_harddisks_2/implementation/shdd2-parser
Log:


Modified: people/michael/features/setup_harddisks_2/implementation/shdd2-parser
===================================================================
--- people/michael/features/setup_harddisks_2/implementation/shdd2-parser	2006-07-22 11:04:02 UTC (rev 3607)
+++ people/michael/features/setup_harddisks_2/implementation/shdd2-parser	2006-07-22 11:07:22 UTC (rev 3608)
@@ -357,11 +357,15 @@
   $k=$k.">";
   foreach my $key (keys %$hash_ref)
   {
-    printf "$k Schluessel: ". $key." Wert: ".$hash_ref->{$key}."\n";
     if (ref($hash_ref->{$key}))
     {
+      printf "$k Schluessel: ". $key." Wert: "."Hash" ."\n";
       &print_hash($hash_ref->{$key}, $k);
     }
+    else
+    {
+      printf "$k Schluessel: ". $key." Wert: ".$hash_ref->{$key}."\n";
+    }
 
   }
 }