From 598b3bf3de345e40a0c2942c77c24f37353b3cec Mon Sep 17 00:00:00 2001
From: Peter Lemenkov <lemenkov@gmail.com>
Date: Fri, 26 Nov 2010 23:44:29 +0300
Subject: [PATCH] Use http instead of httpc in old Erlang

Signed-off-by: Peter Lemenkov <lemenkov@gmail.com>
---
 src/oauth_client.erl |    2 +-
 src/oauth_http.erl   |    2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/oauth_client.erl b/src/oauth_client.erl
index 2bd24c0..73a7869 100644
--- a/src/oauth_client.erl
+++ b/src/oauth_client.erl
@@ -68,7 +68,7 @@ oauth_get(header, URL, Params, Consumer, Token, TokenSecret) ->
   Signed = oauth:signed_params("GET", URL, Params, Consumer, Token, TokenSecret),
   {AuthorizationParams, QueryParams} = lists:partition(fun({K, _}) -> lists:prefix("oauth_", K) end, Signed),
   Request = {oauth:uri(URL, QueryParams), [oauth:header(AuthorizationParams)]},
-  httpc:request(get, Request, [{autoredirect, false}], []);
+  http:request(get, Request, [{autoredirect, false}], []);
 oauth_get(querystring, URL, Params, Consumer, Token, TokenSecret) ->
   oauth:get(URL, Params, Consumer, Token, TokenSecret).
 
diff --git a/src/oauth_http.erl b/src/oauth_http.erl
index 92c806c..bf5a4ba 100644
--- a/src/oauth_http.erl
+++ b/src/oauth_http.erl
@@ -10,7 +10,7 @@ post(URL, Data) ->
   request(post, {URL, [], "application/x-www-form-urlencoded", Data}).
 
 request(Method, Request) ->
-  httpc:request(Method, Request, [{autoredirect, false}], []).
+  http:request(Method, Request, [{autoredirect, false}], []).
 
 response_params(Response) ->
   oauth_uri:params_from_string(response_body(Response)).
-- 
1.7.2.3