Revision a9542a4f src/Ganeti/Objects.hs
b/src/Ganeti/Objects.hs | ||
---|---|---|
669 | 669 |
-- * Cluster definitions |
670 | 670 |
$(buildObject "Cluster" "cluster" $ |
671 | 671 |
[ simpleField "rsahostkeypub" [t| String |] |
672 |
, simpleField "dsahostkeypub" [t| String |] |
|
672 | 673 |
, simpleField "highest_used_port" [t| Int |] |
673 | 674 |
, simpleField "tcpudp_port_pool" [t| [Int] |] |
674 | 675 |
, simpleField "mac_prefix" [t| String |] |
Also available in: Unified diff