Revision fc963293 src/Ganeti/OpParams.hs
| b/src/Ganeti/OpParams.hs | ||
|---|---|---|
| 162 | 162 |
, pRequiredNodes |
| 163 | 163 |
, pRequiredNodeUuids |
| 164 | 164 |
, pStorageType |
| 165 |
, pStorageTypeOptional
|
|
| 165 |
, pOptStorageType
|
|
| 166 | 166 |
, pStorageChanges |
| 167 | 167 |
, pMasterCandidate |
| 168 | 168 |
, pOffline |
| ... | ... | |
| 894 | 894 |
pStorageType = |
| 895 | 895 |
withDoc "Storage type" $ simpleField "storage_type" [t| StorageType |] |
| 896 | 896 |
|
| 897 |
pStorageTypeOptional :: Field
|
|
| 898 |
pStorageTypeOptional =
|
|
| 897 |
pOptStorageType :: Field
|
|
| 898 |
pOptStorageType =
|
|
| 899 | 899 |
withDoc "Storage type" . |
| 900 |
renameField "StorageTypeOptional" .
|
|
| 900 |
renameField "OptStorageType" .
|
|
| 901 | 901 |
optionalField $ simpleField "storage_type" [t| StorageType |] |
| 902 | 902 |
|
| 903 | 903 |
pStorageName :: Field |
Also available in: Unified diff