Changeset 41055
- Timestamp:
- Nov 5, 2019, 8:11:49 AM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/ipp-20191011/Nebulous/lib/Nebulous/Client.pm
r41005 r41055 319 319 $self->set_err("can not cull - not enough instances"); 320 320 $log->debug("leaving"); 321 322 321 return; 323 322 } … … 335 334 336 335 unless (defined $locations) { 337 $self->set_err( "no instances" );338 336 $log->debug( "leaving" ); 339 340 337 return; 341 338 } … … 352 349 } 353 350 } 351 354 352 # If we don't have two copies on one volume, see if we have two copies on a single 355 353 # cabinet. If so, delete the first of those copies. … … 363 361 } 364 362 } 363 365 364 # Fail-safe. We didn't have any duplicates (the instances are "well-mixed"), so 366 365 # delete the first. … … 1028 1027 $self->set_err($response->faultstring); 1029 1028 # check to see if this failure is because $key doesn't exist 1029 my $string = $response->faultstring; 1030 1030 if ($response->faultstring =~ /is valid object key/) { 1031 $self->set_err("invalid object key"); 1031 1032 $log->debug( "leaving" ); 1032 1033 return; … … 1034 1035 # key is valid but no instances are on the specified volume 1035 1036 if ($response->faultstring =~ /no instances on storage volume/) { 1037 $self->set_err("no instances on storage volume or volume is not available"); 1036 1038 $log->debug( "leaving" ); 1037 1039 return;
Note:
See TracChangeset
for help on using the changeset viewer.
