Commit 03473d1f authored by Leigh Stoller's avatar Leigh Stoller

Kill debugging, too much noise in the log.

parent 93c6ede4
#!/usr/bin/perl -w
#
# Copyright (c) 2008-2017 University of Utah and the Flux Group.
# Copyright (c) 2008-2018 University of Utah and the Flux Group.
#
# {{{GENIPUBLIC-LICENSE
#
......@@ -234,7 +234,7 @@ sub HandleSliverStatus($$$$)
{
my ($site, $sliver_urn, $instance, $json) = @_;
print "HandleSliverStatus: $site, $sliver_urn, $instance\n";
#print "HandleSliverStatus: $site, $sliver_urn, $instance\n";
if (exists($instance->AggregateHash()->{$site})) {
my $sliver = $instance->AggregateHash()->{$site};
......@@ -262,7 +262,7 @@ sub HandleSliceStatus($$$)
{
my ($site, $instance, $json) = @_;
print "HandleSliceStatus: $site, $instance\n";
#print "HandleSliceStatus: $site, $instance\n";
if (exists($instance->AggregateHash()->{$site})) {
my $sliver = $instance->AggregateHash()->{$site};
......
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