On Tue, May 31, 2011 at 02:55:57PM +0200, Guido Trotter wrote: > On Mon, May 30, 2011 at 3:30 PM, Iustin Pop <[email protected]> wrote: > > This is not handled yet, this patch just adds parsing of the incoming > > request. > > --- > > htools/Ganeti/HTools/IAlloc.hs | 26 ++++++++++++++++++++++++++ > > 1 files changed, 26 insertions(+), 0 deletions(-) > > > > diff --git a/htools/Ganeti/HTools/IAlloc.hs b/htools/Ganeti/HTools/IAlloc.hs > > index 741a370..091db9d 100644 > > --- a/htools/Ganeti/HTools/IAlloc.hs > > +++ b/htools/Ganeti/HTools/IAlloc.hs > > @@ -114,6 +114,13 @@ parseGroup u a = do > > apol <- extract "alloc_policy" > > return (u, Group.create name u apol) > > > > +parseTargetGroups :: [(String, JSValue)] -- ^ The JSON object > > The JSON object containing what? The group list?
Actually the 'request' dict in the iallocator message. I'll update the docstring. iustin
