Commit 3e26b2b6 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Minor bug fix.

parent 1b65c836
#!/usr/bin/perl -w
# Copyright (c) 2008-2009 University of Utah and the Flux Group.
# Copyright (c) 2008-2010 University of Utah and the Flux Group.
# All rights reserved.
use strict;
......@@ -96,7 +96,9 @@ my $context = Genixmlrpc->Context($certificate);
if (!defined($context)) {
fatal("Could not create context to talk to clearinghouse");
my $clearinghouse = GeniRegistry::ClearingHouse->Create($context);
my $clearinghouse = GeniRegistry::ClearingHouse->Create();
if (!defined($clearinghouse)) {
fatal("Could not create a clearinghouse client");
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