diff options
Diffstat (limited to 'src/chttpd_misc.erl')
-rw-r--r-- | src/chttpd_misc.erl | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/chttpd_misc.erl b/src/chttpd_misc.erl index 535932ae..0aa666f6 100644 --- a/src/chttpd_misc.erl +++ b/src/chttpd_misc.erl @@ -98,8 +98,12 @@ handle_all_dbs_req(Req) -> handle_task_status_req(#httpd{method='GET'}=Req) -> - % convert the list of prop lists to a list of json objects - send_json(Req, [{Props} || Props <- couch_task_status:all()]); + {Replies, _BadNodes} = gen_server:multi_call(couch_task_status, all), + Response = lists:flatmap(fun({Node, Tasks}) -> + [{[{node,Node} | Task]} || Task <- Tasks] + end, Replies), + % TODO filter by customer + send_json(Req, Response); handle_task_status_req(Req) -> send_method_not_allowed(Req, "GET,HEAD"). |