Revision b75430d9 test/hs/Test/Ganeti/OpCodes.hs

b/test/hs/Test/Ganeti/OpCodes.hs
95 95
  arbitrary = IDiskParams <$> arbitrary <*> arbitrary <*>
96 96
              genMaybe genNameNE <*> genMaybe genNameNE <*>
97 97
              genMaybe genNameNE <*> genMaybe genNameNE <*>
98
              arbitrary
98
              genMaybe genNameNE <*> arbitrary
99 99

  
100 100
instance Arbitrary RecreateDisksInfo where
101 101
  arbitrary = oneof [ pure RecreateDisksAll

Also available in: Unified diff