diff options
author | Zandra <[email protected]> | 2016-01-29 17:44:07 +0100 |
---|---|---|
committer | Zandra <[email protected]> | 2016-01-29 17:44:07 +0100 |
commit | e038cbe699acc19901e10b9569a3b783e900582d (patch) | |
tree | b1167aedbaebb835e0a8a59be8528f43b4da3864 /lib/inets/test/httpd_test_lib.erl | |
parent | 8a6abf9ac1ce0bae427e202b857d03b89086bb8d (diff) | |
parent | 57a928b4bc1076b169ecc95e38ab23cf79e03280 (diff) | |
download | otp-e038cbe699acc19901e10b9569a3b783e900582d.tar.gz otp-e038cbe699acc19901e10b9569a3b783e900582d.tar.bz2 otp-e038cbe699acc19901e10b9569a3b783e900582d.zip |
Merge branch 'maint'
Conflicts:
OTP_VERSION
Diffstat (limited to 'lib/inets/test/httpd_test_lib.erl')
-rw-r--r-- | lib/inets/test/httpd_test_lib.erl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/inets/test/httpd_test_lib.erl b/lib/inets/test/httpd_test_lib.erl index c58966ce10..71e201f826 100644 --- a/lib/inets/test/httpd_test_lib.erl +++ b/lib/inets/test/httpd_test_lib.erl @@ -96,10 +96,10 @@ verify_request(SocketType, Host, Port, TranspOpts, Node, RequestStr, Options, Ti try inets_test_lib:connect_bin(SocketType, Host, Port, TranspOpts) of {ok, Socket} -> ok = inets_test_lib:send(SocketType, Socket, RequestStr), - State = case inets_regexp:match(RequestStr, "printenv") of + State = case re:run(RequestStr, "printenv", [{capture, none}]) of nomatch -> #state{}; - _ -> + match -> #state{print = true} end, @@ -317,10 +317,10 @@ do_validate(Header, [_Unknown | Rest], N, P) -> do_validate(Header, Rest, N, P). is_expect(RequestStr) -> - case inets_regexp:match(RequestStr, "xpect:100-continue") of - {match, _, _}-> + case re:run(RequestStr, "xpect:100-continue", [{capture, none}]) of + match-> true; - _ -> + nomatch -> false end. |