anchor.diff:  
           Result2 ->
               try
  -                {{halt, 200}, wrq:set_resp_body(mochijson:encode(Result2), ReqData), Context}
  +                JSON = iolist_to_binary(mochijson:encode(Result2)),
  +                Body = case get_callback(Context) of
  +                           undefined -> JSON;
  +                           Callback -> [ Callback, $(, JSON, $), $; ]
  +                       end,
  +                {{halt, 200}, wrq:set_resp_body(Body, ReqData), Context}
               catch
  -                _E: R ->
  -                    ?DEBUG(R),
  +                _E:plop ->
                       ReqData1 = wrq:set_resp_body("Internal JSON encoding error.\n", ReqData),
                       {{halt, 500}, ReqData1, Context}
               end
  
positive.code:         Result ->
              api_result(ReqData, Context, Result)
      end.
  
negative.code: 
  content_types_provided(ReqData, Context) ->
      {[{"application/json", to_json},
        {"application/javascript", to_json},
        {"text/javascript", to_json}
       ], ReqData, Context}.
  
  