Revision fc963293
b/src/Ganeti/OpCodes.hs | ||
---|---|---|
335 | 335 |
[t| [[JSValue]] |], |
336 | 336 |
OpDoc.opNodeQueryStorage, |
337 | 337 |
[ pOutputFields |
338 |
, pStorageTypeOptional
|
|
338 |
, pOptStorageType
|
|
339 | 339 |
, withDoc |
340 | 340 |
"Empty list to query all, list of names to query otherwise" |
341 | 341 |
pNodes |
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