anchor.diff:  			ocs_event:notify(delete_resource, Resource, resource)
   	end.
   
  --spec query_resource(Cont, MatchId, MatchCategory,
  +-spec query_resource(Cont, MatchId, MatchName,
   		MatchResSpecId, MatchRelName) -> Result
   	when
   		Cont :: start | any(),
   		MatchId :: Match,
  -		MatchCategory :: Match,
  +		MatchName :: Match,
   		MatchResSpecId :: Match,
   		MatchRelName :: Match,
   		Match :: {exact, string()} | {like, string()} | '_',
  
positive.code: 		when is_list(String), ((Op == exact) orelse (Op == like)) ->
  	MatchHead2 = case lists:last(String) of
  		$% when Op == like ->
  			MatchHead1#resource{category = lists:droplast(String) ++ '_'};
  		_ ->
           MatchHead1#resource{category = String}
  	end,
     query_resource2(Cont, MatchHead2, MatchResSpecId, MatchRelName).
  query_resource2(Cont, MatchHead, '_', MatchRelName) ->
  
negative.code: 		_ ->
           #resource{id = String, _ = '_'}
  	end,
     query_resource1(Cont, MatchHead, MatchName,
  			MatchResSpecId, MatchRelName).
  %% @hidden
  query_resource1(Cont, MatchHead, '_', MatchResSpecId, MatchRelName) ->
  