Revision 3bcf2140 src/Ganeti/Objects.hs
b/src/Ganeti/Objects.hs | ||
---|---|---|
659 | 659 |
-- | The iallocator parameters type. |
660 | 660 |
type IAllocatorParams = Container JSValue |
661 | 661 |
|
662 |
-- | The master candidate client certificate digests |
|
663 |
type CandidateCertificates = Container String |
|
664 |
|
|
662 | 665 |
-- * Cluster definitions |
663 | 666 |
$(buildObject "Cluster" "cluster" $ |
664 | 667 |
[ simpleField "rsahostkeypub" [t| String |] |
... | ... | |
702 | 705 |
, simpleField "prealloc_wipe_disks" [t| Bool |] |
703 | 706 |
, simpleField "ipolicy" [t| FilledIPolicy |] |
704 | 707 |
, simpleField "enabled_disk_templates" [t| [DiskTemplate] |] |
708 |
, simpleField "candidate_certs" [t| CandidateCertificates |] |
|
705 | 709 |
] |
706 | 710 |
++ timeStampFields |
707 | 711 |
++ uuidFields |
Also available in: Unified diff