You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@couchdb.apache.org by da...@apache.org on 2014/02/12 07:22:29 UTC
[11/12] oauth commit: updated refs/heads/import-master to db23ab2
add support of erlang R15B in oauth.
Project: http://git-wip-us.apache.org/repos/asf/couchdb-oauth/repo
Commit: http://git-wip-us.apache.org/repos/asf/couchdb-oauth/commit/b6f836dd
Tree: http://git-wip-us.apache.org/repos/asf/couchdb-oauth/tree/b6f836dd
Diff: http://git-wip-us.apache.org/repos/asf/couchdb-oauth/diff/b6f836dd
Branch: refs/heads/import-master
Commit: b6f836dd6cabd746f532df81d8389506a1267284
Parents: 07b034b
Author: benoitc <be...@apache.org>
Authored: Mon Jan 2 17:39:01 2012 +0100
Committer: benoitc <be...@apache.org>
Committed: Mon Jan 2 17:39:01 2012 +0100
----------------------------------------------------------------------
oauth_uri.erl | 2 ++
1 file changed, 2 insertions(+)
----------------------------------------------------------------------
http://git-wip-us.apache.org/repos/asf/couchdb-oauth/blob/b6f836dd/oauth_uri.erl
----------------------------------------------------------------------
diff --git a/oauth_uri.erl b/oauth_uri.erl
index 5023f98..aebf093 100644
--- a/oauth_uri.erl
+++ b/oauth_uri.erl
@@ -9,6 +9,8 @@
normalize(URI) ->
case http_uri:parse(URI) of
+ {ok, {Scheme, UserInfo, Host, Port, Path, _Query}} -> % R15B
+ normalize(Scheme, UserInfo, string:to_lower(Host), Port, [Path]);
{Scheme, UserInfo, Host, Port, Path, _Query} ->
normalize(Scheme, UserInfo, string:to_lower(Host), Port, [Path]);
Else ->