Commit ab537952 authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Minor bug fix; tarballs -> tarfiles

parent 0309b646
...@@ -812,14 +812,14 @@ sub GetTicket($;$) ...@@ -812,14 +812,14 @@ sub GetTicket($;$)
if (exists($ref->{'tarfiles'})) { if (exists($ref->{'tarfiles'})) {
my $tarfiles = $ref->{'tarfiles'}; my $tarfiles = $ref->{'tarfiles'};
if (! TBcheck_dbslot($tarfiles, "virt_nodes", "tarballs", if (! TBcheck_dbslot($tarfiles, "virt_nodes", "tarfiles",
TBDB_CHECKDBSLOT_WARN|TBDB_CHECKDBSLOT_ERROR)) { TBDB_CHECKDBSLOT_WARN|TBDB_CHECKDBSLOT_ERROR)) {
$response = $response =
GeniResponse->Create(GENIRESPONSE_BADARGS, undef, GeniResponse->Create(GENIRESPONSE_BADARGS, undef,
"Invalid tarfiles"); "Invalid tarfiles");
goto bad; goto bad;
} }
$nodeblob->{'tarballs'} = $tarfiles; $nodeblob->{'tarfiles'} = $tarfiles;
} }
my $virtnode = $virtexperiment->NewTableRow("virt_nodes", $nodeblob); my $virtnode = $virtexperiment->NewTableRow("virt_nodes", $nodeblob);
......
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