anchor.diff:                                       {[], ScratchDir}, Members),
               [{Path, Rewrite(Value)}|Existing]
       end;
  +%% TODO: deprecate 'extra' as it is no longer used
   extend({extra, [{_, _, _}|_]=Stuff}, Existing) ->
       Items = [{M,F,[hd(extend(A, Existing)) || A <- Args]} ||
                                                           {M,F,Args} <- Stuff],
  
positive.code:         _ ->
              lists:keyreplace(K, 1, Existing, New)
      end;
  extend({environment, _}=New, Existing) ->
      [New|Existing];
  extend({environment, _, _}=New, Existing) ->
  
negative.code: code_change(_OldVsn, State, _Extra) ->
      {ok, State}.
  
  merge(New, Existing) when is_tuple(New) ->
      K = element(1, New),
      case lists:keymember(K, 1, Existing) of
  