anchor.diff:      {noreply, State};
   handle_cast({cmd, Cmd, _} = IntCmd,
               #state{cmds=Cmds, socket=Socket, tag=Tag} = State) ->
  -    %% ?LOG_DEBUG("IMAP Being issued cmd: ~p", [Cmd]),
  +    % lager:debug("IMAP Being issued cmd: ~p", [Cmd]),
       CTag = <<$C, (integer_to_binary(Tag))/binary>>,
       ok = ssl:send(Socket, [CTag, " " | cmd_to_data(Cmd)]),
       {noreply, State#state{cmds=gb_trees:insert(CTag, IntCmd, Cmds), tag=Tag+1}};
   %% Called once all inital commands have been completed
   handle_cast({lifecycle, {cmds, complete}}, #state{opts=Opts} = State) ->
  -    % ?LOG_DEBUG("cmds complete", []),
  +    % lager:debug("cmds complete", []),
       case proplists:get_value(post_init_callback, Opts) of
           undefined ->
               {noreply, State};
  
positive.code: 
  -define(CALL_TIMEOUT, 5000).
  
  
  -ifdef(DEBUG).
      -define(LOG_DEBUG(Format, Data),
              ?LOG_INFO("*** DEBUG: " ++ Format ++ " ***", Data)).
      -define(LOG_ERROR(Fun, Format, Data),
              error_logger:error_msg("~p:~p(): " ++ Format ++ "~n",
                                     [?MODULE, Fun] ++ Data)).
      -define(LOG_WARNING(Fun, Format, Data),
              error_logger:warning_msg("~p:~p(): " ++ Format ++ "~n",
                                       [?MODULE, Fun] ++ Data)).
      -define(LOG_INFO(Format, Data), error_logger:info_msg(Format ++ "~n", Data)).
  -else.
      -define(LOG_DEBUG(Format, Data), true).
      -define(LOG_ERROR(Fun, Format, Data), true).
      -define(LOG_WARNING(Fun, Format, Data), true).
      -define(LOG_INFO(Format, Data), true).
  -endif.
  
  %% Types
  -type socket() :: ssl:sslsocket() | gen_tcp:socket().
  
negative.code:                                        end),
                           State#state{cmds=gb_trees:delete(Tag, Cmds)};
                       none ->
                           lager:warning("Unknown Cmd Tag: ~p", [Tag]),
                           State
                   end).
  
  