anchor.diff:  code_change(_OldVsn, State, _Extra) -> {ok, State}.
   
   %%
  -%% Private
  +%% Frame Handlers
   %%
  -
  --spec handle_frame(#stomp_frame{}, #s{}) -> {ok | stop, #s{}}.
  -%% @private
  -handle_frame(Frame = #stomp_frame{command = Cmd}, State) ->
  -    case Cmd of
  -        "STOMP"   -> connect(Frame, State);
  -        "CONNECT" -> connect(Frame, State);
  -        Unknown   -> send_error(unknown_command,
  -                                "Command '~p' is not recognized.~n",
  -                                [Unknown],
  -                                State)
  -    end.
   
   %% @private
   connect(#stomp_frame{}, State = #s{session = undefined}) ->
  
positive.code:                ?CONTENT_TEXT,
                 ?VERSION_HEADER],
      case send_frame("ERROR", Headers, Detail, State) of
          {ok, NewState} -> {error, Message, NewState};
          Error          -> Error
      end.
  
  %% @private
  
negative.code: %% @hidden
  handle_cast(stop, State) ->
      {stop, normal, State};
  handle_cast(Frame = #stomp_frame{command = Cmd}, State) ->
      case Cmd of
          "STOMP"      -> connect(Frame, State);
          "CONNECT"    -> connect(Frame, State);
          "DISCONNECT" -> disconnect(Frame, State);
          _Unknown     -> unsupported(Frame, State)
      end;
  handle_cast(Msg, State) ->
      {stop, {unhandled_cast, Msg}, State}.
  