Revision 5ce621ab src/Ganeti/OpParams.hs
b/src/Ganeti/OpParams.hs | ||
---|---|---|
100 | 100 |
, pOptDiskTemplate |
101 | 101 |
, pFileDriver |
102 | 102 |
, pFileStorageDir |
103 |
, pGlobalFileStorageDir
|
|
104 |
, pGlobalSharedFileStorageDir
|
|
103 |
, pClusterFileStorageDir
|
|
104 |
, pClusterSharedFileStorageDir
|
|
105 | 105 |
, pVgName |
106 | 106 |
, pEnabledHypervisors |
107 | 107 |
, pHypervisor |
... | ... | |
541 | 541 |
withDoc "Set disk states" . |
542 | 542 |
optionalField $ simpleField "disk_state" [t| JSObject JSValue |] |
543 | 543 |
|
544 |
-- | Global directory for storing file-backed disks. |
|
545 |
pGlobalFileStorageDir :: Field |
|
546 |
pGlobalFileStorageDir = optionalNEStringField "file_storage_dir" |
|
547 |
|
|
548 |
-- | Global directory for storing shared-file-backed disks. |
|
549 |
pGlobalSharedFileStorageDir :: Field |
|
550 |
pGlobalSharedFileStorageDir = optionalNEStringField "shared_file_storage_dir" |
|
544 |
-- | Cluster-wide default directory for storing file-backed disks. |
|
545 |
pClusterFileStorageDir :: Field |
|
546 |
pClusterFileStorageDir = |
|
547 |
renameField "ClusterFileStorageDir" $ |
|
548 |
optionalStringField "file_storage_dir" |
|
549 |
|
|
550 |
-- | Cluster-wide default directory for storing shared-file-backed disks. |
|
551 |
pClusterSharedFileStorageDir :: Field |
|
552 |
pClusterSharedFileStorageDir = |
|
553 |
renameField "ClusterSharedFileStorageDir" $ |
|
554 |
optionalStringField "shared_file_storage_dir" |
|
551 | 555 |
|
552 | 556 |
-- | Volume group name. |
553 | 557 |
pVgName :: Field |
Also available in: Unified diff