Commit b32b268c authored by Leigh B Stoller's avatar Leigh B Stoller

Minor bug fix.

parent 55e39fab
......@@ -454,7 +454,7 @@ sub Create($;$$)
my ($class, $context, $credential) = @_;
if (!defined($credential)) {
$credential = GeniRegistry::ClearingHouse->GetCredential();
$credential = GeniRegistry::ClearingHouse->GetCredential($context);
if (!defined($credential)) {
print STDERR "Could not create clearinghouse credential\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