anchor.diff:      [RenderInit,RenderInitGenActions].
   
   info(Pro, Req, State) ->
  -    Render = case Pro of
  -        {flush,Actions} ->
  -            % wf:info("Comet Actions: ~p",[Actions]),
  -            wf:render(Actions);
  -        <<"N2O,",Rest/binary>> ->
  -            Module = State#context.module, Module:event(init),
  -            InitActions = get(actions),
  -            wf_context:clear_actions(),
  -            Pid = wf:depickle(Rest),
  -            %wf:info("Transition Pid: ~p",[Pid]),
  -            case Pid of
  -                undefined -> 
  -                    %wf:info("Path: ~p",[wf:path(Req)]),
  -                    %wf:info("Module: ~p",[Module]),
  -                    Elements = try Module:main() catch C:E -> wf:error_page(C,E) end,
  -                    wf_core:render(Elements),
  -                    render_actions(InitActions);
  +    Render = 
  +        case Pro of
  +            {flush,Actions} ->
  +                                                % wf:info("Comet Actions: ~p",[Actions]),
  +                wf:render(Actions);
  +            <<"N2O,",Rest/binary>> ->
  +                Module = State#context.module, Module:event(init),
  +                InitActions = get(actions),
  +                wf_context:clear_actions(),
  +                Pid = wf:depickle(Rest),
  +                                                %wf:info("Transition Pid: ~p",[Pid]),
  +                case Pid of
  +                    undefined -> 
  +                                                %wf:info("Path: ~p",[wf:path(Req)]),
  +                                                %wf:info("Module: ~p",[Module]),
  +                        Elements = try Module:main() catch C:E -> wf:error_page(C,E) end,
  +                        wf_core:render(Elements),
  +                        render_actions(InitActions);
   
  -                Transition ->
  -                    X = Pid ! {'N2O',self()},
  -                    R = receive Actions -> [ render_actions(InitActions) | wf:render(Actions) ]
  -                    after 100 ->
  -                          QS = element(14, Req),
  -                          wf:redirect(case QS of <<>> -> ""; _ -> "" ++ "?" ++ wf:to_list(QS) end),
  -                          []
  -                    end,
  -                    R
  -                    end;
  -        <<"PING">> -> [];
  -        Unknown ->
  -            M = State#context.module,
  -            catch M:event(Unknown),
  -            Actions = get(actions),
  -            wf_context:clear_actions(),
  -            wf:render(Actions) end,
  +                    Transition ->
  +                        X = Pid ! {'N2O',self()},
  +                        R = receive Actions -> [ render_actions(InitActions) | wf:render(Actions) ]
  +                            after 100 ->
  +                                    QS = element(14, Req),
  +                                    wf:redirect(case QS of <<>> -> ""; _ -> "" ++ "?" ++ wf:to_list(QS) end),
  +                                    []
  +                            end,
  +                        R
  +                end;
  +            <<"PING">> -> [];
  +            Unknown ->
  +                wf:info("Unknown WS Info Message ~p", [Unknown]),
  +                M = State#context.module,
  +                catch M:event(Unknown),
  +                Actions = get(actions),
  +                wf_context:clear_actions(),
  +                wf:render(Actions) end,
       GenActions = get(actions),
       wf_context:clear_actions(),
       RenderGenActions = wf:render(GenActions),
       wf_context:clear_actions(),
  -    {reply, [<<"EVAL">>,Render,RenderGenActions], Req, State}.
  +    JS = iolist_to_binary([Render,RenderGenActions]),
  +    {reply, wf:json([{eval,JS}]), Req, State}.
   
   terminate(_Req, _State=#context{module=Module}) ->
       % wf:info("Bullet Terminated~n"),
  
positive.code:                 event           -> lists:map(fun({K,V})-> put(K,V) end,Linked),
                                     Module:Function(Parameter);
                  UserCustomEvent -> Module:Function(Parameter,Trigger,State) end;
            _Ev -> wf:error("N2O allows only #ev{} events") end,
  
      Actions = get(actions),
      wf_context:clear_actions(),
      Render = wf:render(Actions),
  
      GenActions = get(actions),
      RenderGenActions = wf:render(GenActions),
      wf_context:clear_actions(),
  
      {reply, [<<"EVAL">>,Render,RenderGenActions], Req, State};
  stream(Data, Req, State) ->
      wf:info("Data Received ~p",[Data]),
      self() ! Data,
  
negative.code:     Req1 = wf:header(<<"Access-Control-Allow-Origin">>, <<"*">>, NewCtx#context.req),
      {ok, Req1, NewCtx}.
  
  html_events(Pro, State) ->
      Pickled = proplists:get_value(pickle,Pro),
      Linked = proplists:get_value(linked,Pro),
      Depickled = wf:depickle(Pickled),
      %wf:info("Depickled: ~p",[Depickled]),
      case Depickled of
          #ev{module=Module,name=Function,payload=Parameter,trigger=Trigger} ->
              case Function of 
  