--- a/SI/dumper.pm	Sun Jan 17 16:40:08 2010 +0100
+++ b/SI/dumper.pm	Mon Jan 18 20:35:27 2010 +0100
@@ -8,15 +8,11 @@
 sub dump($\%) {
     my ($file, $devs) = @_;
 
-    ### $devs
-    use Data::Dumper;
-    print Dumper $devs;
-    exit;
-
     my %volume = %{$devs->{volume}};
 
     foreach my $v ( grep { $volume{$_}{type} ~~ /^ext/ } keys %volume ) {
 	verbose("dumping $v\n");
+	### v: $volume{$v}
     }
 }