anchor.diff:  convert_term_to_json_option([A | _] = Value)
       when is_atom(A) ->
       convert_term_to_json_atoms(Value);
  -convert_term_to_json_option([] = Value) ->
  -    Value;
   convert_term_to_json_option([_ | _] = Value) ->
       cloudi_string:term_to_binary_compact(Value);
   convert_term_to_json_option(Value)
  
positive.code: convert_term_to_json({ok, Options}, Method, Space)
      when Method =:= acl;
           Method =:= nodes_get;
           Method =:= logging ->
      json_encode([{<<"success">>, true},
                   {erlang:atom_to_binary(Method, utf8),
                    convert_term_to_json_options(Options)}], Space).
  
negative.code:       [erlang:list_to_binary(Key ++ "=" ++ Value)
         || {Key, Value} <- Env]} | ServiceN].
  
  convert_term_to_json_option([] = Value) ->
      Value;
  convert_term_to_json_option([{Key, _} | _] = Value)
      when is_atom(Key) ->
      convert_term_to_json_options(Value);
  convert_term_to_json_option([[{Key, _} | _] | _] = Value)
      when is_atom(Key) ->
      [convert_term_to_json_options(Options)
       || Options <- Value];
  convert_term_to_json_option([H | _] = Value)
      when is_integer(H), H > 0 ->
      erlang:list_to_binary(Value);
  