anchor.diff:          [{list_to_binary(Section), {Values}} | Acc]
       end, [], Grouped),
       send_json(Req, 200, {KVs});
  -% GET /_node/$node/config/Section
  +% GET /_node/$node/_config/Section
   handle_node_req(#httpd{method='GET', path_parts=[_, Node, <<"_config">>, Section]}=Req) ->
       KVs = [{list_to_binary(Key), list_to_binary(Value)}
               || {Key, Value} <- call_node(Node, config, get, [Section])],
       send_json(Req, 200, {KVs});
  -% PUT /_node/$node/config/Section/Key
  +% PUT /_node/$node/_config/Section/Key
   % "value"
   handle_node_req(#httpd{method='PUT', path_parts=[_, Node, <<"_config">>, Section, Key]}=Req) ->
       Value = chttpd:json_body(Req),
  
positive.code:     Value ->
          send_json(Req, 200, list_to_binary(Value))
      end;
  % DELETE /_node/$node/config/Section/Key
  handle_node_req(#httpd{method='DELETE',path_parts=[_, Node, <<"_config">>, Section, Key]}=Req) ->
      Persist = chttpd:header_value(Req, "X-Couch-Persist") /= "false",
      case call_node(Node, config, get, [Section, Key, undefined]) of
  
negative.code:         call_node(Node, config, delete, [Section, Key, Persist]),
          send_json(Req, 200, list_to_binary(OldValue))
      end;
  % GET /_node/$node/_stats
  handle_node_req(#httpd{path_parts=[_, Node, <<"_stats">> | Path]}=Req) ->
      flush(Node, Req),
      Stats0 = call_node(Node, couch_stats, fetch, []),
  