All new accounts created on Gitlab now require administrator approval. If you invite any collaborators, please let Flux staff know so they can approve the accounts.

Commit 6afd5dd7 authored by Leigh B Stoller's avatar Leigh B Stoller

Remove debugging code.

parent 9268bdfa
#!/usr/bin/perl -wT #!/usr/bin/perl -wT
# #
# Copyright (c) 2007-2014 University of Utah and the Flux Group. # Copyright (c) 2007-2015 University of Utah and the Flux Group.
# #
# {{{EMULAB-LICENSE # {{{EMULAB-LICENSE
# #
...@@ -440,7 +440,7 @@ sub CreateDataset($) ...@@ -440,7 +440,7 @@ sub CreateDataset($)
if (defined($self->expires())); if (defined($self->expires()));
my $cmurl = $authority->url(); my $cmurl = $authority->url();
$cmurl =~ s/protogeni/protogeni\/stoller/; # $cmurl =~ s/protogeni/protogeni\/stoller/;
return Genixmlrpc::CallMethod($cmurl, $context, "CreateDataset", $args); return Genixmlrpc::CallMethod($cmurl, $context, "CreateDataset", $args);
} }
...@@ -471,7 +471,7 @@ sub DeleteDataset($) ...@@ -471,7 +471,7 @@ sub DeleteDataset($)
$speaksfor_credential->asString()], $speaksfor_credential->asString()],
}; };
my $cmurl = $authority->url(); my $cmurl = $authority->url();
$cmurl =~ s/protogeni/protogeni\/stoller/; # $cmurl =~ s/protogeni/protogeni\/stoller/;
return Genixmlrpc::CallMethod($cmurl, $context, "DeleteDataset", $args); return Genixmlrpc::CallMethod($cmurl, $context, "DeleteDataset", $args);
} }
...@@ -506,7 +506,7 @@ sub ModifyDataset($) ...@@ -506,7 +506,7 @@ sub ModifyDataset($)
if (defined($self->expires())); if (defined($self->expires()));
my $cmurl = $authority->url(); my $cmurl = $authority->url();
$cmurl =~ s/protogeni/protogeni\/stoller/; # $cmurl =~ s/protogeni/protogeni\/stoller/;
return Genixmlrpc::CallMethod($cmurl, $context, "ModifyDataset", $args); return Genixmlrpc::CallMethod($cmurl, $context, "ModifyDataset", $args);
} }
...@@ -538,7 +538,7 @@ sub ExtendDataset($) ...@@ -538,7 +538,7 @@ sub ExtendDataset($)
"extend" => 1, "extend" => 1,
}; };
my $cmurl = $authority->url(); my $cmurl = $authority->url();
$cmurl =~ s/protogeni/protogeni\/stoller/; # $cmurl =~ s/protogeni/protogeni\/stoller/;
return Genixmlrpc::CallMethod($cmurl, $context, "ModifyDataset", $args); return Genixmlrpc::CallMethod($cmurl, $context, "ModifyDataset", $args);
} }
...@@ -569,7 +569,7 @@ sub DescribeDataset($) ...@@ -569,7 +569,7 @@ sub DescribeDataset($)
$speaksfor_credential->asString()], $speaksfor_credential->asString()],
}; };
my $cmurl = $authority->url(); my $cmurl = $authority->url();
$cmurl =~ s/protogeni/protogeni\/stoller/; # $cmurl =~ s/protogeni/protogeni\/stoller/;
return Genixmlrpc::CallMethod($cmurl, $context, "DescribeDataset", $args); return Genixmlrpc::CallMethod($cmurl, $context, "DescribeDataset", $args);
} }
......
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