anchor.diff:  			    Whence ->
   				wallaroo:put_entity(Name, PutKind, Entity, Whence)
   			end,
  -	    % error_logger:info_msg("NewCommit is ~p~n", [NewCommit]),
  +	    ?D_LOG("NewCommit is ~p~n", [NewCommit]),
   	    case NewCtx of
   		#ww_ctx{via={branch, Branch}} ->
   		    wallaroo:put_branch(Branch, NewCommit);
  
positive.code:     SHA = ensure_str_format(orddict:fetch(commit, Data), list),
      Meta = atomize_meta(orddict_default_fetch(meta, Data, [])),
      Annotation = orddict_default_fetch(annotation, Data, []),
      % error_logger:warning_msg("about to convert JSON to a tag: Name=~p, SHA=~p, Meta=~p, Annotation=~p", [Name, SHA, Meta, Annotation]),
      case {tag_fjh, wallaroo:put_tag(Name, SHA, Annotation, Meta)} of
  	{tag_fjh, {fail, _}=Failure} ->
  	    ResponseBody = 
  
negative.code: -record(ww_ctx, {show_all=false, name, commit, branch, via, head, config_for}). 
  % -define(DO_TRACE, {trace, "priv"}).
  -define(DO_TRACE, ok).
  
  -include("dlog.hrl").
  
  config_for(#ww_ctx{config_for=Kind}) ->
      Kind.
  