aboutsummaryrefslogtreecommitdiff
path: root/src/web/mod_http_fileserver.erl
diff options
context:
space:
mode:
authorBadlop <badlop@process-one.net>2009-06-16 13:44:38 +0000
committerBadlop <badlop@process-one.net>2009-06-16 13:44:38 +0000
commitbd106bd45f317d5720bff416adeaaec1ca6b3a9f (patch)
tree26e7f886b8fc0e0a6ce3b4910b173560619ff03c /src/web/mod_http_fileserver.erl
parentAdded accesslog parameter to record requests log in a file similar to Apache ... (diff)
Small change in accesslog file format; fix bug when accesslog conf parameter wasn't present in the conf file (thanks to Jerome Sautret)
SVN Revision: 2170
Diffstat (limited to 'src/web/mod_http_fileserver.erl')
-rw-r--r--src/web/mod_http_fileserver.erl8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/web/mod_http_fileserver.erl b/src/web/mod_http_fileserver.erl
index f04cf113c..a0c14964f 100644
--- a/src/web/mod_http_fileserver.erl
+++ b/src/web/mod_http_fileserver.erl
@@ -56,7 +56,7 @@ process(LocalPath, Request) ->
Result = serve(LocalPath),
case ets:lookup(mod_http_fileserver, accessfile) of
- undefined ->
+ [] ->
ok;
[{accessfile, AccessFile}] ->
{Code, _, _} = Result,
@@ -114,7 +114,7 @@ log(File, Code, Request) ->
% combined apache like log format :
% 127.0.0.1 - - [28/Mar/2007:18:41:55 +0200] "GET / HTTP/1.1" 302 303 "-" "tsung"
% XXX TODO some fields are harcoded/missing (reply size, user agent or referer for example)
- io:format(File, "~p - - [~p/~p/~p:~p:~p:~p] \"~s /~s~s\" ~p -1 \"-\" \"-\"~n",
+ io:format(File, "~s - - [~p/~p/~p:~p:~p:~p] \"~s /~s~s\" ~p -1 \"-\" \"-\"~n",
[IP, Day, Month, Year, Hour, Minute, Second, Request#request.method, Path, Query, Code]).
content_type(Filename) ->
@@ -145,7 +145,7 @@ loop(Filename) ->
receive
reopenlog ->
case ets:lookup(mod_http_fileserver, accessfile) of
- undefined ->
+ [] ->
ok;
[{accessfile, AccessFile}] ->
file:close(AccessFile),
@@ -198,7 +198,7 @@ stop(_Host) ->
ok;
_ ->
case ets:lookup(mod_http_fileserver, accessfile) of
- undefined ->
+ [] ->
ok;
[{accessfile, AccessFile}] ->
mod_http_fileserver_server ! stop,