IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 31964


Ignore:
Timestamp:
Aug 1, 2011, 3:36:53 PM (15 years ago)
Author:
watersc1
Message:

Duplicate my declaration.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Nebulous/bin/neb-shift

    r28446 r31964  
    2929
    3030pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
    31 pod2usage( -msg => "Required options: --server <source key> <source volume>",
     31pod2usage( -msg => "Required options: --server --volume <source key> <source volume>",
    3232        -exitval => 2 )
    33         unless defined $server and defined $src and defined $abandon_vol;
     33        unless defined $server and defined $src and defined $abandon_vol and defined $volume;
    3434
    3535my $neb = Nebulous::Client->new(
     
    4545}
    4646
     47my $all_uris = $neb->find_instances($src);
     48
    4749my $status;
    48 if ($volume) {
    49     $status = $neb->replicate( $src, $volume);
     50$status = $neb->replicate( $src, $volume);
     51die "Replicate phase failed for $src ($abandon_vol) ($volume)" unless $status;
     52
     53$uris = $neb->find_instances($src, "~$volume");
     54unless (defined $uris) {
     55    die "Replicate phase failed for $src ($abandon_vol) ($volume)";
    5056}
    51 else {
    52     $status = $neb->replicate($src);
    53 }
    54 die "Replicate phase failed for $src ($abandon_vol) ($volume)" unless $status;
    5557
    5658$status = $neb->cull($src,$abandon_vol);
Note: See TracChangeset for help on using the changeset viewer.