anchor.diff:  			map_print(P,Map);
   		{ok,{changes,Rowid,NChanged}} ->
   			print(P,"Rowid: ~p, Rows changed: ~p",[Rowid,NChanged]);
  -		{'EXIT',{noproc,_}} when P#dp.env == wx ->
  +		{error,{login_failed,_}} when P#dp.env == wx ->
   			wxproc ! dologin,
   			P;
   		{'EXIT',{noproc,_}} ->
  
positive.code: 			map_print(P,Map);
  		{ok,{changes,_Rowid,_NChanged}} ->
  			print(P,"Schema updated.",[]);
  		{'EXIT',{noproc,_}} when P#dp.env == wx ->
  			wxproc ! dologin,
  			P;
  		{'EXIT',{noproc,_}} ->
  
negative.code: 	P.
  
  dologin(P) ->
  	application:stop(actordb_client),
  	PoolInfo = [{size, 1}, {max_overflow, 5}],
  	WorkerParams = [{hostname, P#dp.addr},
  		{username, P#dp.username},
  