anchor.diff:  
   %% @doc
   %% Function: decode/1
  -%% Purpose : decodes a json object. 
  +%% Purpose : Decodes a json object. 
   %% Returns : Either a mochiweb, json_term(), representation of the json object
   %%           or a more readable version which only contains lists, tuples and string
   %% @end
  
positive.code:     end.
  
  
  mk_pretty(R) when is_binary(R) ->
      binary_to_list(R);
  
  mk_pretty(R) when is_integer(R) ->
      integer_to_list(R);
  
  mk_pretty(R) when is_list(R) ->
      lists:map(fun mk_pretty/1, R);
  
  mk_pretty({struct, Values})  ->
      ValuesList = lists:map(fun tuple_to_list/1, Values),
      StringValues = lists:map(fun mk_pretty/1, ValuesList),
      lists:map(fun list_to_tuple/1, StringValues);
  
  mk_pretty(R) ->
      R.
  
  %% ====================================================================
  %% Internal functions
  %% ====================================================================
  encode_help(Json) when is_tuple(Json)->
      JsonList = tuple_to_list(Json),
      encode_help(JsonList, "").
  
negative.code:     mk_pretty(Result).
  
  %% @doc
  %% Function: get_field_help/2
  %% Purpose: Get a value at a certain field.
  %% Returns: Return the value of the specified field, if it exists, otherwise
  %%          returns 'false' value.
  %% @end
  get_field_help(Json, Query) ->
      JsonObj = mochijson2:decode(Json),
      JsonParser = destructure_json:parse("Obj."++Query),
      JsonParser(JsonObj).
  
  %% @doc
  %% Function: get_field_value/3
  %% Purpose: Get a certain value of a certain field
  %% Returns: Returns the value of the specified field, if it exists, otherwise
  %%          returns 'false' value. Handles  wildcard searches for fields (not 
  %%          wildcard for values)
  %% @end
  get_field_value(Json, Query, Value) ->
      QueryParts = find_wildcard_fields(Query),
      case field_recursion(Json, QueryParts, Value) of
  