--- a/SI/dumper.pm	Wed Jan 20 17:44:57 2010 +0100
+++ b/SI/dumper.pm	Wed Jan 20 21:35:35 2010 +0100
@@ -9,8 +9,10 @@
 sub dump($\%) {
     my ($file, $devs) = @_;
 
-    foreach my $volume (map { { name => $_, %{ $devs->{volume}{$_} } } }
-        keys %{ $devs->{volume} })
+    foreach my $volume (
+        map { { name => $_, %{ $devs->{volume}{$_} } } }
+        keys %{ $devs->{volume} }
+      )
     {
         next if !defined $volume->{type} or $volume->{type} !~ /^ext/i;