anchor.diff:      notify(State, {notice, Notice}),
       {next_state, State_Name, State};
   
  +handle_event({notification, _Channel, _Pid, _Payload} = Msg, State_Name, State) ->
  +    notify_async(State, Msg),
  +    {next_state, State_Name, State};
  +
   handle_event({parameter_status, Name, Value}, State_Name, State) ->
       State1 = case {Name, Value} of
           {<<"integer_datetimes">>, <<"on">>} -> State#state{integer_datetimes=true};
  
positive.code: to_binary(B) when is_binary(B) -> B;
  to_binary(L) when is_list(L)   -> list_to_binary(L).
  
  hex(Bin) ->
      HChar = fun(N) when N < 10 -> $0 + N;
                 (N) when N < 16 -> $W + N
  
negative.code: startup({connect, Host, Username, Password, Opts}, From, State) ->
      Port      = proplists:get_value(port, Opts, 5432),
      Sock_Opts = [{nodelay, true}, {active, false}, {packet, raw}, binary],
      Async   = proplists:get_value(async, Opts, undefined),
      case gen_tcp:connect(Host, Port, Sock_Opts) of
          {ok, Sock} ->
              Reader = spawn_link(?MODULE, read, [self(), Sock, <<>>]),
  