From 065ab77baecdc8215a13f6331b31db3ec727838c Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Tue, 6 Sep 2011 09:09:37 +0000 Subject: [PATCH] fix readonly flag for first snapshot git-svn-id: svn://svn.rot13.org/sysadmin-cookbook@270 191e9f34-6774-4a6d-acfc-7664dacd4a2a --- recepies/zfs/zfs-replicate-pool.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/recepies/zfs/zfs-replicate-pool.pl b/recepies/zfs/zfs-replicate-pool.pl index 71e4b05..57c94cb 100755 --- a/recepies/zfs/zfs-replicate-pool.pl +++ b/recepies/zfs/zfs-replicate-pool.pl @@ -97,7 +97,7 @@ foreach my $fs ( @arh ) { $snapshot = "-i $from_pool/$name\@$prev $from_pool/$name\@$snap"; } - warn "zfs transfer $snapshot -> $to_dev"; + warn "zfs transfer $snapshot -> $to_dev\n"; my $t = time(); @@ -116,8 +116,8 @@ foreach my $fs ( @arh ) { $t = time() - $t; warn "took $t seconds to complete\n"; - $dev->system("zfs set readonly=on $to_pool/$name\@$snap") if $i == 0; - die $dev->error if $dev->error; + $dev->system("zfs set readonly=on $to_pool/$name") if $i == 0; + warn "ERROR: ",$dev->error if $dev->error; sleep 1; $dev_snapshot = snapshots_from $dev; -- 2.20.1