Revision aa922d64 src/Ganeti/OpParams.hs

b/src/Ganeti/OpParams.hs
236 236
  , pOpPriority
237 237
  , pDependencies
238 238
  , pComment
239
  , pReason
240 239
  , pEnabledDiskTemplates
241 240
  , dOldQuery
242 241
  , dOldQueryNoLocking
......
1445 1444
pComment :: Field
1446 1445
pComment = optionalNullSerField $ stringField "comment"
1447 1446

  
1448
-- | The description of the state change reason.
1449
pReason :: Field
1450
pReason = simpleField "reason" [t| (InstReasonSrc, NonEmptyString) |]
1451

  
1452 1447
-- * Entire opcode parameter list
1453 1448

  
1454 1449
-- | Old-style query opcode, with locking.

Also available in: Unified diff