anchor.diff:  		[ Bucket | Filters ] ->
   			F = fun() ->
   				Objects = mnesia:match_object(#rest{ guid = '_', bucket = Bucket, object = '_' }),
  -				JSON = json:encode(filter_objects(Objects, list_to_filters(Filters))),
  +				Matching = filter_objects(Objects, list_to_filters(Filters)),
  +				JSON = json:encode([ json:decode(O) || #rest{ object = O } <- Matching ]),
   				#response{ status = 200, headers = [{<<"Content-Length">>,integer_to_binary(byte_size(JSON)) }], body = JSON }
   			end,
   			mnesia:activity(transaction,F);
  
positive.code: 			end,
  			mnesia:activity(transaction,F);
  		[ Bucket | Filters ] ->
  		_ -> 
  			#response{ status = 403 }
  	end,
  
negative.code: 	rpc:multicall(Nodes,application,stop, [ mnesia ]).
  
  filter_objects(Objects,Filters) ->
  	lists:filter(fun(#rest{ object = Object }) ->
  		O = json:decode(Object),	
  		lists:foldl(fun ({K,V},B) ->
  			B and (V =:= proplists:get_value(K,O))
  		end, true, Filters)
  	end, Objects).
  
  url_decode([], Acc) ->
  	lists:reverse(Acc);
  