--- a/si	Fri Jan 15 20:40:14 2010 +0100
+++ b/si	Fri Jan 15 23:17:23 2010 +0100
@@ -5,20 +5,24 @@
 use warnings;
 use if $ENV{DEBUG} => "Smart::Comments";
 
+use Sys::Hostname;
+
 use SI::ptable;
 use SI::blkid;
 use SI::lvm;
+use SI::mbr;
 
-my $OUT = "out";
+my $OUT = "../out-" . hostname;
 
 unlink(glob("$OUT/*"));
 -d $OUT or mkdir($OUT, 0700) or die "Can't mkdir $OUT: $!\n";
 
 my %devices;
 
-SI::ptable::info("$OUT/partitions.%s", %devices);
-SI::blkid::info("$OUT/blkid", %devices);
-SI::lvm::vg_info("$OUT/vg.%s", %devices);
+SI::ptable::save("$OUT/partitions.%s", %devices);
+SI::blkid::save("$OUT/blkid", %devices);
+SI::lvm::vgcfgbackup("$OUT/vg.%s", %devices);
+SI::mbr::save("$OUT/mbr.%s", %devices);
 
 ### %devices;