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

Tiny little tweak.

parent 6f484ed1
#!/usr/bin/perl -wT
# Copyright (c) 2007-2015 University of Utah and the Flux Group.
# Copyright (c) 2007-2016 University of Utah and the Flux Group.
......@@ -212,13 +212,13 @@ sub GeniContext()
sub GenAuthCredential($;$)
my ($target, $privs) = @_;
my $certificate = GeniCertificate->LoadFromFile($SACERT);
if (!defined($certificate)) {
my $owner = GeniCertificate->LoadFromFile($SACERT);
if (!defined($owner)) {
print STDERR "Could not load certificate from $SACERT\n";
return undef;
my $credential = GeniCredential->Create($target, $certificate);
my $credential = GeniCredential->Create($target, $owner);
if (!defined($credential)) {
print STDERR "Could not create credential for $target\n";
return undef;
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