Fix warning, add error log on Other

It appears the test was originaly menat to work as the "Other" case would be hit, and then when hitting the Other case - the code would previously just loop round without adding a header.

This is no longer the case (i.e. even if the original 'Other' handling is provided).

Author: martinsumner

src/mochiweb_http.erl

@@ -136,6 +136,8 @@ headers(Socket, Opts, Request, Headers, Body, HeaderCount) ->
             mochiweb_socket:close(Socket),
             exit(normal);
         Other ->
+            error_logger:warning_msg("Got unexpected Message: ~w (to pid=~w)~n",
+                                     [Other, self()]),
             handle_invalid_msg_request(Other, Socket, Opts, 400, Request, Headers)
     after ?HEADERS_RECV_TIMEOUT ->
         mochiweb_socket:close(Socket),

test/mochiweb_http_tests.erl

@@ -101,7 +101,7 @@ unexpected_msg_send(Server, MsgAt, Msg) ->
     gen_tcp:recv(S, 0, 5000).
 
 invalid_header_send(Server, Msg) ->
-    {S, Acceptor} = setup_server(Server),
+    {S, _Acceptor} = setup_server(Server),
     gen_tcp:send(S, Msg),
     gen_tcp:recv(S, 0, 5000).