Commit a620018b authored by Leigh B Stoller's avatar Leigh B Stoller

Minor bug fix to ListUsage and ListHistory.

parent 2abb0b5a
......@@ -1354,7 +1354,7 @@ sub ListUsage($)
return GeniResponse->MalformedArgsResponse("Missing arguments");
}
my @credentials = @{ $credentials };
return GeniCM::ListUsage({"credentials" => $credentials[0]});
return GeniCM::ListUsage({"credential" => $credentials[0]});
}
sub ListHistory($)
......@@ -1367,8 +1367,8 @@ sub ListHistory($)
return GeniResponse->MalformedArgsResponse("Missing arguments");
}
my @credentials = @{ $credentials };
return GeniCM::ListHistory({"credentials" => $credentials[0],
"type" => $type});
return GeniCM::ListHistory({"credential" => $credentials[0],
"type" => $type});
}
#
......
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