Revision 64b0309a src/Ganeti/Query/Server.hs
b/src/Ganeti/Query/Server.hs | ||
---|---|---|
116 | 116 |
, ("master_netmask", showJSON $ clusterMasterNetmask cluster) |
117 | 117 |
, ("use_external_mip_script", |
118 | 118 |
showJSON $ clusterUseExternalMipScript cluster) |
119 |
, ("volume_group_name", showJSON $ clusterVolumeGroupName cluster) |
|
119 |
, ("volume_group_name", |
|
120 |
maybe JSNull showJSON (clusterVolumeGroupName cluster)) |
|
120 | 121 |
, ("drbd_usermode_helper", |
121 | 122 |
maybe JSNull showJSON (clusterDrbdUsermodeHelper cluster)) |
122 | 123 |
, ("file_storage_dir", showJSON $ clusterFileStorageDir cluster) |
Also available in: Unified diff