Revision ad6f2bf3 src/Ganeti/HsConstants.hs

b/src/Ganeti/HsConstants.hs
519 519
fdLoop :: String
520 520
fdLoop = Types.fileDriverToRaw FileLoop
521 521

  
522
fileDriver :: FrozenSet String
523
fileDriver =
524
  ConstantUtils.mkSet $
525
  map Types.fileDriverToRaw [minBound..]
526

  
522 527
-- | The set of drbd-like disk types
523 528
ldsDrbd :: FrozenSet String
524 529
ldsDrbd = ConstantUtils.mkSet [Types.diskTemplateToRaw DTDrbd8]

Also available in: Unified diff