anchor.diff:  %%                                      {stop, Reason, State}
   %% Description: Handling cast messages
   %%--------------------------------------------------------------------
  -handle_cast({send_cmd, Cmd}, State = #state{sock=Sock}) ->
  +handle_cast({send_cmd, Cmd = #irc_cmd{}}, State) ->
       Line = irc_messages:to_list(Cmd),
  +    handle_cast({send_line, Line}, State);
  +handle_cast({send_line, Line}, State = #state{sock=Sock}) ->
       case gen_tcp:send(Sock, Line) of
           ok -> {noreply, State};
           {error, Reason} -> 
  
positive.code:     inet:setopts(Socket, [{active, true}]),
      o_send(State, connected),
      {reply, ok, State#state{sock=Socket}};
  handle_call({line, Line}, _From, State = #state{sock=Sock}) ->
      case gen_tcp:send(Sock, Line) of
          ok -> {reply, ok, State};
          {error, Reason} -> 
  
negative.code:                           []).
  
  send_line(Con, Line) ->
      gen_server:cast(Con, {send_line, Line}).
  
  send_cmd(Con, Cmd = #irc_cmd{}) ->
      Line = irc_messages:to_list(Cmd),
      send_line(Con, Line).
  
  close(Con) ->
      gen_server:call(Con, close).
  