anchor.diff:  	    {skip,"No new shell found"};
   	_ ->
   	    ?line RNode = create_nodename(),
  -	    ?line MyNode = atom_to_list(node()),
  +	    ?line MyNode = atom2list(node()),
   	    ?line Pid = spawn_link(fun() ->
   					   receive die ->
   						   ok
  
positive.code: 		{putline, "whereis(user_drv)."},
  		{getline, "undefined"}],[]),
  	old
      catch E:R ->
  	    ?dbg({E,R}),
  	    new
      end.
  
negative.code: 					   end),
  	    ?line PidStr = rpc:call(NSNode,erlang,pid_to_list,[Pid]),
  	    ?line true = rpc:call(NSNode,erlang,register,[kalaskula,Pid]),
  	    ?line NSNodeStr = atom2list(NSNode),
  	    ?line CookieString = lists:flatten(
  				   io_lib:format("~w",
  						 [erlang:get_cookie()])),
  