anchor.diff:  
   to_json( {started, R, LamName}, Session ) ->
   
  -  Host = list_to_binary( inet:gethostname() ),
  +  {ok, Host} = inet:gethostname(),
   
     jsone:encode( #{ vsn      => ?VSN,
     	                session  => Session,
     	                msg_type => invoc,
  -  	                data     => #{ host_name => Host, id => R, lam_name => list_to_binary( LamName ), status => started } } );
  +  	                data     => #{ host_name => list_to_binary( Host ), id => R, lam_name => list_to_binary( LamName ), status => started } } );
   
   to_json( {failed, Reason, S, MissingLst}, Session )when is_list( MissingLst ) ->
   
  -  Host = list_to_binary( inet:gethostname() ),
  +  {ok, Host} = inet:gethostname(),
   
   	jsone:encode( #{ vsn      => ?VSN,
   		               session  => Session,
   		               msg_type => invoc,
  -		               data     => #{ host_name  => Host, 
  +		               data     => #{ host_name  => list_to_binary( Host ), 
   		                              id         => S,
   		                              status     => error,
   		                              lam_name   => undef,
  
positive.code:   jsone:encode( #{ vsn      => ?VSN,
                     session  => Session,
                     msg_type => invoc,
                     data     => #{ host_name => Host, 
                                    id        => Id,
                                    status    => ok,
                                    lam_name  => list_to_binary( LamName ),
  
negative.code: 
  to_json( {finished, Sum}, Session ) ->
  
    {ok, Host} = inet:gethostname(),
  
    #{ id     := Id,
       state  := ok,
  