--- a/SI/dumper.pm Tue Jan 19 23:45:54 2010 +0100
+++ b/SI/dumper.pm Tue Jan 19 23:48:10 2010 +0100
@@ -9,17 +9,19 @@
sub dump($\%) {
my ($file, $devs) = @_;
- foreach my $volume ( map { { name => $_, %{$devs->{volume}{$_}}}} keys %{$devs->{volume}}) {
- next if !defined $volume->{type} or $volume->{type} !~ /^ext/i;
-
- system("fsck -f -C0 $volume->{name}");
- die "ERR: fsck failed\n" if $? > 2;
+ foreach my $volume (map { { name => $_, %{ $devs->{volume}{$_} } } }
+ keys %{ $devs->{volume} })
+ {
+ next if !defined $volume->{type} or $volume->{type} !~ /^ext/i;
- verbose("dumping volume $volume->{name}");
- my $dumpdev = $volume->{name};
- my $of = sprintf $file, basename($volume->{name});
- run("dump -0 -z -f $of $dumpdev");
- verbose("\n");
+ system("fsck -f -C0 $volume->{name}");
+ die "ERR: fsck failed\n" if $? > 2;
+
+ verbose("dumping volume $volume->{name}");
+ my $dumpdev = $volume->{name};
+ my $of = sprintf $file, basename($volume->{name});
+ run("dump -0 -z -f $of $dumpdev");
+ verbose("\n");
}
}