anchor.diff:      Member = pg2:get_members(To),
       case Member of
   	[To|_]-> lists:foreach(fun(N)->pg2:join(N) end),
  -		 self()!subscribed;
  +		 To!subscribed;
   	{error,_}-> self()!error
       end,
       {ok,State};
  
positive.code:     case Member of
  	[To|_]->pg2:join(Channel),
  		self()!subscribed;
  	{error,_} ->self()!error
      end,
  	{ok,State};
  
  
negative.code: 
      Member = pg2:get_members(Channel),
      case Member of 
  	[Channel|_]->Channel!{send,Msg};
  	{error,_}-> lager:info("unavailable")
      end,
      {ok,State};
  
  