Commit 5db4bc14 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Minor bug fix.

parent 01df44fd
......@@ -692,7 +692,11 @@ sub Describe
my ($slice, $aggregate) = GeniCMV2::Credential2SliceAggregate($cred);
return $slice
if (GeniResponse::IsResponse($slice));
if (defined($slice) && GeniResponse::IsResponse($slice));
return GeniResponse->Create(GENIRESPONSE_SEARCHFAILED, undef,
"No such slice here")
if (! defined($slice));
my $ticket = GeniTicket->SliceTicket($slice);
if (! defined($slice) ||
(! defined($ticket) && ! defined($aggregate))) {
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment