Changeset 17756 for trunk/Nebulous/lib
- Timestamp:
- May 19, 2008, 5:46:11 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/Nebulous/lib/Nebulous/Client.pm (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous/lib/Nebulous/Client.pm
r17737 r17756 1 1 # Copyright (c) 2004-2008 Joshua Hoblitt 2 2 # 3 # $Id: Client.pm,v 1.5 1 2008-05-19 20:52:37jhoblitt Exp $3 # $Id: Client.pm,v 1.52 2008-05-20 03:46:11 jhoblitt Exp $ 4 4 5 5 package Nebulous::Client; … … 671 671 my $self = shift; 672 672 673 my ( $key ) = validate_pos( @_,673 my ( $key, @params ) = validate_pos( @_, 674 674 { 675 675 type => SCALAR, … … 684 684 $log->debug( "entered - @_" ); 685 685 686 my $locations = $self->find_instances( $key, undef ); 686 my $locations = $self->find_instances( $key, @params ); 687 unless (defined $locations) { 688 unless ($self->err =~ /no instances on storage volume/) { 689 return; 690 } 691 692 # then fall back to looking for isntances on any volume 693 $locations = $self->find_instances( $key, ':any'); 694 unless (defined $locations) { 695 return; 696 } 697 } 687 698 688 699 my $path;
Note:
See TracChangeset
for help on using the changeset viewer.
