Revision fc42a408

b/htools/Ganeti/HTools/Types.hs
197 197
  [ THH.renameField "StdSpec" $ THH.simpleField "std" [t| ISpec |]
198 198
  , THH.renameField "MinSpec" $ THH.simpleField "min" [t| ISpec |]
199 199
  , THH.renameField "MaxSpec" $ THH.simpleField "max" [t| ISpec |]
200
  , THH.renameField "DiskTemplates" $
201
      THH.simpleField "disk_templates" [t| [DiskTemplate] |]
200 202
  ])
201 203

  
202 204
-- | Converts an ISpec type to a RSpec one.
......
211 213
defIPolicy = IPolicy { iPolicyStdSpec = defStdISpec
212 214
                     , iPolicyMinSpec = defMinISpec
213 215
                     , iPolicyMaxSpec = defMaxISpec
216
                     -- hardcoding here since Constants.hs exports the
217
                     -- string values, not the actual type; and in
218
                     -- htools, we are mostly looking at DRBD
219
                     , iPolicyDiskTemplates = [DTDrbd8, DTPlain]
214 220
                     }
215 221

  
216 222
-- | The dynamic resource specs of a machine (i.e. load or load

Also available in: Unified diff