Revision 6b6e335b htools/Ganeti/HTools/IAlloc.hs

b/htools/Ganeti/HTools/IAlloc.hs
130 130 
  name <- extract "name"
131 131 
  apol <- extract "alloc_policy"
132 132 
  ipol <- extract "ipolicy"
133 
  return (u, Group.create name u apol ipol)
133 
  tags <- extract "tags"
134 
  return (u, Group.create name u apol ipol tags)
134 135 

  		





  135
  136
  
    
-- | Top-level parser.


  		





  136
  137
  
    
--


  		












Also available in:
  Unified diff