Revision 3a715da0 src/Ganeti/HsConstants.hs

b/src/Ganeti/HsConstants.hs
904 904
drbdBNone :: String
905 905
drbdBNone = "n"
906 906

  
907
-- | Valid barrier combinations: "n" or any non-null subset of "bfd"
908
drbdValidBarrierOpt :: FrozenSet (FrozenSet String)
909
drbdValidBarrierOpt =
910
  ConstantUtils.mkSet
911
  [ ConstantUtils.mkSet [drbdBNone]
912
  , ConstantUtils.mkSet [drbdBDiskBarriers]
913
  , ConstantUtils.mkSet [drbdBDiskDrain]
914
  , ConstantUtils.mkSet [drbdBDiskFlush]
915
  , ConstantUtils.mkSet [drbdBDiskDrain, drbdBDiskFlush]
916
  , ConstantUtils.mkSet [drbdBDiskBarriers, drbdBDiskDrain]
917
  , ConstantUtils.mkSet [drbdBDiskBarriers, drbdBDiskFlush]
918
  , ConstantUtils.mkSet [drbdBDiskBarriers, drbdBDiskFlush, drbdBDiskDrain]
919
  ]
920

  
907 921
-- | Rbd tool command
908 922
rbdCmd :: String
909 923
rbdCmd = "rbd"

Also available in: Unified diff