Commit 60ee38ed authored by Leigh B Stoller's avatar Leigh B Stoller

Add HaveExperimentNodes() method.

parent d63ce4e5
......@@ -356,6 +356,22 @@ sub LookupByType($$)
return @result;
}
#
# Do we have regular nodes? Class method.
#
sub HaveExperimentNodes()
{
my $query_result =
DBQueryWarn("select count(node_id) from nodes as n ".
"left join node_types as t on t.type=n.type ".
"where t.class='pc'");
return 0
if (!$query_result);
my ($count) = $query_result->fetchrow_array();
return $count;
}
sub Create($$$$)
{
my ($class, $node_id, $experiment, $argref) = @_;
......
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