 
   defp do_reply(state, reply) do
     case state.current do
-      %Current{fun: fun, from: from} ->
+      %Current{fun: _fun, from: from} ->
         # Logger.success 3, "FW Replying: #{fun}: #{inspect from}"
         :ok = GenServer.reply from, reply
       nil ->

    end
  end

  defp do_queue_cmd(%Current{fun: fun, args: _args, from: from} = current, state) do
    # Logger.busy 3, "FW Queuing: #{fun}: #{inspect from}"
    new_q = :queue.in(current, state.queue)
    {:noreply, [], %{state | queue: new_q}}

    end
  end

  defp do_begin_cmd(%Current{fun: fun, args: args, from: _from} = current, state, dispatch) do
    # Logger.busy 3, "FW Starting: #{fun}: #{inspect from}"
    case apply(state.handler_mod, fun, [state.handler | args]) do
      :ok ->
