anchor.diff:                  {false, _} ->
                       From !{get_next_command, Parent, [ok, []]};
                   Others ->
  -                    CR1s =case Others of 
  -                              true ->
  -                                  CRs;
  -                              {true, Data} when is_function(CRs,1)->
  -                                  CRs(Data);
  -                              {true, _} ->
  -                                  CRs
  -                          end,
  -                    Pid = spawn_link(fun()->
  -                                             cmd_server_loop(
  -                                               Parent, 
  -                                               State#state{cmds=make_list(CR1s)})
  -                                     end),
  -                    process_flag(trap_exit, true),
  +                    CR1 =case Others of
  +                             true ->
  +                                 CR;
  +                             {true, Data} when is_function(CR,1) ->
  +                                 CR(Data);
  +                             {true, _} ->
  +                                 CR
  +                         end,
  +                    Pid = process_one_cr(Parent, false, Mode, CR1),
                       From ! {get_next_command, Pid, [ok,[]]}
               end;
           {'EXIT', ChildrenPid, Reason} ->
  
positive.code: -define(wrangler_debug(__String, __Args), ok).
  -endif.
  
  start_link(Cmds)->
      gen_server:start({local, ?MODULE}, ?MODULE,[Cmds], []).
  
  init([Cmds]) ->
      ?wrangler_debug("Cmds:\n~p\n", [Cmds]),
      process_flag(trap_exit, true),
      NameTrackerPid = spawn_link(fun()->name_tracker_loop([]) end),
      register(wrangler_name_tracker, NameTrackerPid),
      CurrentPid = self(),
      Pid=spawn_link(fun()->cmd_server_loop(CurrentPid, 
                                            #state{cmds=make_list(Cmds),
                                                   name_tracker_pid=NameTrackerPid})
                     end),
      {ok, {Pid, NameTrackerPid}}.
  
  
  
negative.code: %% BY default, we refer to the new entity; but if the new name is unknown from 
  %% the script, it is possible to refer to the old entity name, but that must be 
  %% flagged!!!
  name_tracker_loop(State) -> 
      ?wrangler_debug("State:\n~p\n", [State]),
      receive
          {name_change, BeforeAfter} ->
  