anchor.diff:  	ReqData :: rd(), Context :: state()}.
   %% @doc Content negotiation for response body.
   content_types_provided(ReqData, Context) ->
  -	case wrq:method(ReqData) of
  +	NewReqData = wrq:set_resp_header("Access-Control-Allow-Origin", "*", ReqData),
  +	case wrq:method(NewReqData) of
   		'POST' ->
   			{[{"application/hal+json", add_subscriber}], ReqData, Context};
   		Method when Method == 'GET'; Method == 'HEAD' ->
  -			case {wrq:path_info(subscriber, ReqData), wrq:req_qs(ReqData)} of
  -				{_, [_|_]} ->
  -					{[], ReqData, Context}
  +			case {wrq:path_info(name, NewReqData), wrq:req_qs(NewReqData)} of
  +				{undefined, _} ->
  +					{[], NewReqData, Context};
  +				{_, []} ->
  +					{[{"application/json", find_subscriber}], NewReqData, Context}
   			end
   	end.
   
  
positive.code: 
  	end.
  
  
negative.code: 		content_types_provided/2,
  		post_is_create/2,
  		create_path/2,
  		find_subscriber/2,
  		add_subscriber/2]).
  
  -include("ocs_wm.hrl").
  