diff options
| author | Fredrik Gustafsson <[email protected]> | 2013-11-14 09:14:16 +0100 |
|---|---|---|
| committer | Fredrik Gustafsson <[email protected]> | 2013-11-14 09:14:16 +0100 |
| commit | ae7ae7d734b980294073ea43923167904349347c (patch) | |
| tree | 58bfa8abc6bbcf44d9b7e01f0ec383eb50dd35ef /lib/inets/src/http_server/mod_head.erl | |
| parent | 69eee1e3d93b353dc07ff6ea167f9ab636478126 (diff) | |
| parent | c46240c78fbce1b8b026f975d80b397209ac4968 (diff) | |
| download | otp-ae7ae7d734b980294073ea43923167904349347c.tar.gz otp-ae7ae7d734b980294073ea43923167904349347c.tar.bz2 otp-ae7ae7d734b980294073ea43923167904349347c.zip | |
Merge branch 'maint'
Diffstat (limited to 'lib/inets/src/http_server/mod_head.erl')
| -rw-r--r-- | lib/inets/src/http_server/mod_head.erl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/inets/src/http_server/mod_head.erl b/lib/inets/src/http_server/mod_head.erl index c346fd4d23..02b8485b25 100644 --- a/lib/inets/src/http_server/mod_head.erl +++ b/lib/inets/src/http_server/mod_head.erl @@ -42,6 +42,10 @@ do(Info) -> %% A response has been sent! Nothing to do about it! {already_sent, _StatusCode, _Size} -> {proceed,Info#mod.data}; + {response, Header, _Body} -> %% New way + {proceed, + lists:keyreplace(response, 1, Info#mod.data, + {response, Header, nobody})}; %% A response has been generated! {_StatusCode, _Response} -> {proceed,Info#mod.data} |