Revision 8d459129 test/hs/Test/Ganeti/OpCodes.hs

b/test/hs/Test/Ganeti/OpCodes.hs
335 335
      "OP_NETWORK_DISCONNECT" ->
336 336
        OpCodes.OpNetworkDisconnect <$> genNameNE <*> genNameNE <*> arbitrary
337 337
      "OP_NETWORK_QUERY" ->
338
        OpCodes.OpNetworkQuery <$> genFieldsNE <*> genNamesNE
338
        OpCodes.OpNetworkQuery <$> genFieldsNE <*> genNamesNE <*> arbitrary
339 339
      "OP_RESTRICTED_COMMAND" ->
340 340
        OpCodes.OpRestrictedCommand <$> arbitrary <*> genNodeNamesNE <*>
341 341
          genNameNE

Also available in: Unified diff