anchor.diff:                      end,
                       dict:fold(PostFoldFun, ok, PostInterpositionFuns),
   
  -                    lager:info("~p: Message after send interposition is: ~p", [node(), Message]),
  +                    lager:info("~p: Message after send interposition is: ~p", [node(), FullMessage]),
   
                       %% Send message along.
                       do_send_message(Name,
  
positive.code:             end,
  
              {noreply, State#state{vclock=VClock}};
          Message ->
              %% Store for reliability, if necessary.
              Result = case proplists:get_value(ack, Options, false) of
                  false ->
                      %% Tracing.
                      WrappedMessage =  {forward_message, ServerRef, Message},
                      WrappedOriginalMessage =  {forward_message, ServerRef, OriginalMessage},
  
                      %% Fire post-interposition functions -- trace after wrapping!
  
negative.code:                 true ->
                      %% Tracing.
                      WrappedOriginalMessage = {forward_message, mynode(), MessageClock, ServerRef, OriginalMessage},
                      WrappedMessage = {forward_message, mynode(), MessageClock, ServerRef, FullMessage},
  
                      %% Fire post-interposition functions -- trace after wrapping!
                      PostFoldFun = fun(_Name, PostInterpositionFun, ok) ->
  