Commit 2f3a3365 authored by Helga Velroyen's avatar Helga Velroyen
Browse files

Replace nodegroups' PartialNic by PartialNicParams



This fixes a bug that corrups the config when one adds a
network to a node group. I wil soon extend QA by some commands
that would have detected this.
Signed-off-by: default avatarHelga Velroyen <helgav@google.com>
Reviewed-by: default avatarGuido Trotter <ultrotter@google.com>
parent ef947a42
......@@ -514,7 +514,7 @@ instance TagsObject Node where
type DiskParams = Container (Container JSValue)
-- | A mapping from network UUIDs to nic params of the networks.
type Networks = Container PartialNic
type Networks = Container PartialNicParams
$(buildObject "NodeGroup" "group" $
[ simpleField "name" [t| String |]
......
......@@ -365,7 +365,7 @@ genNodeGroup = do
diskparams <- pure (GenericContainer Map.empty)
num_networks <- choose (0, 3)
net_uuid_list <- vectorOf num_networks (arbitrary::Gen String)
nic_param_list <- vectorOf num_networks (arbitrary::Gen PartialNic)
nic_param_list <- vectorOf num_networks (arbitrary::Gen PartialNicParams)
net_map <- pure (GenericContainer . Map.fromList $
zip net_uuid_list nic_param_list)
-- timestamp fields
......
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