Commit e3885710 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Minor bug fix.

parent 0e672400
...@@ -3930,9 +3930,10 @@ sub Lockdown($) ...@@ -3930,9 +3930,10 @@ sub Lockdown($)
# #
# Only the SA for the slice can do this. # Only the SA for the slice can do this.
# #
my $caller = $credential->owner_urnOBJ(); my $caller = GeniHRN->new($credential->owner_urn());
my ($tmp) = split(":", $slice->urnOBJ()->domain());
if (! ($caller->IsSA() && if (! ($caller->IsSA() &&
$caller->domain() eq $slice->urnOBJ()->domain())) { $caller->domain() eq $tmp)) {
return GeniResponse->Create(GENIRESPONSE_FORBIDDEN, undef, return GeniResponse->Create(GENIRESPONSE_FORBIDDEN, undef,
"Not enough permission to set/clr lockdown"); "Not enough permission to set/clr lockdown");
} }
......
Markdown is supported
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