anchor.diff:      comet(F, default).
   
   %% @doc Convenience method to start a comet process.
  +comet({Name, F, Msg}, Pool) when is_function(F) ->
  +    Pid = spawn_with_context({Name, F, Msg}, page),
  +    wf:wire(page, page, #comet { function={Name, F, Msg}, pool=Pool, scope=local }),
  +    {ok, Pid};
   comet({Name, F}, Pool) when is_function(F) ->
       Pid = spawn_with_context({Name, F}, page),
       wf:wire(page, page, #comet { function={Name, F}, pool=Pool, scope=local }),
  
positive.code: %% is not started until after the comet postback. So we have to run a checker to fix it
  %% postbak means it's spawned from the postback event already along with the accumulator
  %% and everything. So no need to check for it.
  spawn_with_context({Name, Function}, Mode) ->
      Context = wf_context:context(),
      SeriesID = wf_context:series_id(),
  
negative.code: 
      % Create a process for the AsyncFunction...
      FunctionPid = case Record#comet.function of
          {Name, F, Msg} when is_function(F) ->
              P = spawn_with_context({Name, F, Msg}, postback),
              notify_accumulator_checker(P),
              P;
          {Name, F} when is_function(F) ->
              P = spawn_with_context({Name, F}, postback),
              notify_accumulator_checker(P),
  