anchor.diff:                         Response:write_chunk(io_lib:format("~p</br>",[Why]) ++ get_form(NameField,N+1)),
                      loop(NameField,Response,Binding,N+1)
               end;
  -    _ ->
  +        _ ->
              loop(NameField,Response,Binding,N)
       end.
   
  
positive.code:             case Path of
                 "shell" ->
                     Params=Req:parse_post(),
                     Str=proplists:get_value("str",Params),
                     Pid=list_to_atom(proplists:get_value("name",Params)),
                     Pid ! {post_msg,Str},
                     Req:ok({"text/plain", "success"});
                  _ ->
                      Req:not_found()
  
negative.code: %% Internal API
  loop(NameField, Response,Binding ,N ) ->
      receive
          {client,exit} ->
                      Response:write_chunk("<script type='text/javascript' language='javascript'>
                                            alert('Erlang web shell exit');
                                            window.close();
                                            </script></body></html>"),
                      timer:sleep(100),
                      Response:write_chunk(""),
                      ok;
          {post_msg,Str}->
               try eshell:eval(Str,Binding) of
                  {value,Value,NewBinding} ->
  