anchor.diff:  %%
   %% This queries Riak for the given value, and caches the value in ETS.
   -spec get_checked(Bucket::binary(), Key::binary()) ->
  -    {ok, Value :: json()} | {error, Msg :: list()}.
  +    {ok, Value :: json()} | not_found | {error, Msg :: list()}.
   
   get_checked(Bucket, Key) ->
   	gen_server:call(?MODULE, {get, Bucket, Key}).
  
positive.code: 
  handle_info(_, State) ->
      {noreply, State}.
  
  %% --------------------------------------------------------------------------------------------------------------------
  
  parse_json(Bin) ->
  	{not_really_json}.
  
  %% --------------------------------------------------------------------------------------------------------------------
  
  
negative.code: 			% Cache miss; look it up in Riak.
  			case get_checked(Bucket, Key) of
  				{ok, Value} ->
  					set_cache(Bucket, Key, Value),
  					Value;
  				{error, notfound} ->
  					not_found;
  				Error ->
  					?error("Unexpected response when setting cache during cache miss. Response: ~p", [Error]),
  					{error, "Failed to set cache with Riak's response."}
  