On Mon, May 30, 2011 at 3:30 PM, Iustin Pop <[email protected]> wrote: > --- > htools/Ganeti/HTools/IAlloc.hs | 4 ++-- > 1 files changed, 2 insertions(+), 2 deletions(-) > > diff --git a/htools/Ganeti/HTools/IAlloc.hs b/htools/Ganeti/HTools/IAlloc.hs > index 091db9d..20c4895 100644 > --- a/htools/Ganeti/HTools/IAlloc.hs > +++ b/htools/Ganeti/HTools/IAlloc.hs > @@ -221,5 +221,5 @@ formatResponse success info rq elems = > let > e_success = ("success", JSBool success) > e_info = ("info", JSString . toJSString $ info) > - e_nodes = ("nodes", formatRVal rq elems) > - in encodeStrict $ makeObj [e_success, e_info, e_nodes] > + e_result = ("result", formatRVal rq elems) > + in encodeStrict $ makeObj [e_success, e_info, e_result]
LGTM Thanks, Guido
