diff options
| author | Hans Nilsson <[email protected]> | 2017-10-12 15:02:02 +0200 |
|---|---|---|
| committer | Hans Nilsson <[email protected]> | 2017-10-12 15:02:02 +0200 |
| commit | 7dcaed64849f830a44da28c0d49e908d173b173d (patch) | |
| tree | e44c3879afff4567c3c975ee4f95d83698b3608a /lib/public_key/src/public_key.erl | |
| parent | f37f9eac178836e6bcdf575fa4c72642f146de35 (diff) | |
| parent | 93534057710cef4a88f18f441fea20e733ebc253 (diff) | |
| download | otp-7dcaed64849f830a44da28c0d49e908d173b173d.tar.gz otp-7dcaed64849f830a44da28c0d49e908d173b173d.tar.bz2 otp-7dcaed64849f830a44da28c0d49e908d173b173d.zip | |
Merge branch 'hans/public_key/fix_verif_host_ip_addr_bug' into maint
Diffstat (limited to 'lib/public_key/src/public_key.erl')
| -rw-r--r-- | lib/public_key/src/public_key.erl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/public_key/src/public_key.erl b/lib/public_key/src/public_key.erl index c3f2d791a3..453f34de64 100644 --- a/lib/public_key/src/public_key.erl +++ b/lib/public_key/src/public_key.erl @@ -1529,6 +1529,8 @@ verify_hostname_match_loop(Refs, Pres, MatchFun, FailCB, Cert) -> Refs). +to_lower_ascii({ip,_}=X) -> X; +to_lower_ascii({iPAddress,_}=X) -> X; to_lower_ascii(S) when is_list(S) -> lists:map(fun to_lower_ascii/1, S); to_lower_ascii({T,S}) -> {T, to_lower_ascii(S)}; to_lower_ascii(C) when $A =< C,C =< $Z -> C + ($a-$A); |