From 7218213d1c14c8ce0164fa9a65cc0a21537483ba Mon Sep 17 00:00:00 2001
From: Dave Smith <dizzyd@dizzyd.com>
Date: Wed, 14 Apr 2010 10:39:46 -0600
Subject: [PATCH] Support older, more deployed version of mercurial

---
 src/rebar_deps.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/rebar_deps.erl b/src/rebar_deps.erl
index daa788e..b6efcda 100644
--- a/src/rebar_deps.erl
+++ b/src/rebar_deps.erl
@@ -250,8 +250,8 @@ use_source(AppDir, App, VsnRegex, Source, Count) ->
 
 download_source(AppDir, {hg, Url, Rev}) ->
     ok = filelib:ensure_dir(AppDir),
-    Cmd = ?FMT("hg clone -u ~s ~s", [Rev, Url]),
-    rebar_utils:sh(Cmd, [], filename:dirname(AppDir));
+    rebar_utils:sh(?FMT("hg clone -U ~s", [Url]), [], filename:dirname(AppDir)),
+    rebar_utils:sh(?FMT("hg update ~s", [Rev]), [], AppDir);
 download_source(AppDir, {git, Url, Rev}) ->
     ok = filelib:ensure_dir(AppDir),
     rebar_utils:sh(?FMT("git clone -n ~s", [Url]), [], filename:dirname(AppDir)),
@@ -293,7 +293,7 @@ scm_client_vsn(Path, VsnArg, VsnRegex) ->
             false
     end.
 
-required_scm_client_vsn(hg)  -> {1, 4};
+required_scm_client_vsn(hg)  -> {1, 3};
 required_scm_client_vsn(git) -> {1, 6};
 required_scm_client_vsn(bzr) -> {2, 0};
 required_scm_client_vsn(svn) -> {1, 6}.