[Zetaback-devel] [zetaback commit] r173 - branches/sendr

svn-commit at lists.omniti.com svn-commit at lists.omniti.com
Fri Sep 10 16:40:43 EDT 2010


Author: mark
Date: 2010-09-10 16:40:43 -0400 (Fri, 10 Sep 2010)
New Revision: 173

Modified:
   branches/sendr/zetaback_agent.in
Log:
Fix a few typos

Modified: branches/sendr/zetaback_agent.in
===================================================================
--- branches/sendr/zetaback_agent.in	2010-09-10 19:28:02 UTC (rev 172)
+++ branches/sendr/zetaback_agent.in	2010-09-10 20:40:43 UTC (rev 173)
@@ -243,9 +243,9 @@
   unless($ZFS && $FULL =~ /^\d+$/) {
     die "zfs_agent_perform_full: bad fs or snap name\n"
   }
-  run_pre_cmd $ZFS;
+  run_pre_cmd($ZFS);
   `__ZFS__ snapshot $target`;
-  run_post_cmd $ZFS;
+  run_post_cmd($ZFS);
   my @cmd = ("__ZFS__", "send", $target);
   if($NEEDSFD) {
     fifo_exec(@cmd);
@@ -261,9 +261,9 @@
   unless($ZFS && $BASE) {
     die "zfs_agent_perform_incremental: bad args\n"
   }
-  run_pre_cmd $ZFS;
+  run_pre_cmd($ZFS);
   `__ZFS__ snapshot $target`;
-  run_post_cmd $ZFS;
+  run_post_cmd($ZFS);
   my @cmd = ("__ZFS__", "send", "-i", $base, $target);
   if($NEEDSFD) {
     fifo_exec(@cmd);
@@ -279,13 +279,13 @@
   unless($ZFS && $DSET) {
     die "zfs_agent_perform_dataset: bad args\n"
   }
-  run_pre_cmd $ZFS;
+  run_pre_cmd($ZFS);
   if ($DSET_RECURSE) {
     `__ZFS__ snapshot -r $target`;
   } else {
     `__ZFS__ snapshot $target`;
   }
-  run_post_cmd $ZFS;
+  run_post_cmd($ZFS);
   # $BASE (the base snapshot) is optional. If provided, send an incremental
   # snapshot
   my @cmd = ("__ZFS__", "send");
@@ -386,14 +386,14 @@
 
 sub run_pre_cmd {
     my $dataset = shift;
-    if ($conf{$pre_cmd}) {
+    if ($conf{pre_cmd}) {
         `$conf{pre_cmd} $dataset`;
     }
 }
 
 sub run_post_cmd {
     my $dataset = shift;
-    if ($conf{$post_cmd}) {
+    if ($conf{post_cmd}) {
         `$conf{post_cmd} $dataset`;
     }
 }



More information about the Zetaback-devel mailing list