[PATCH 6 of 6 path intent] commands: define intent for init

[Gregory Szorc]

# HG changeset patch
# User Gregory Szorc <gregory.szorc at gmail.com>
# Date 1411967620 25200
#      Sun Sep 28 22:13:40 2014 -0700
# Node ID 69a784144e1ed85cc51589d3a8a2b6076ef1b028
# Parent  b4762747cbc304126428d33317fd33328be1055c
commands: define intent for init

diff --git a/mercurial/commands.py b/mercurial/commands.py
--- a/mercurial/commands.py
+++ b/mercurial/commands.py
@@ -4243,9 +4243,9 @@ def init(ui, dest=".", **opts):
     See :hg:`help urls` for more information.
 
     Returns 0 on success.
     """
-    hg.peer(ui, opts, ui.expandpath(dest), create=True)
+    hg.peer(ui, opts, ui.expandpath(dest, intent='init'), create=True)
 
 @command('locate',
     [('r', 'rev', '', _('search the repository as it is in REV'), _('REV')),
     ('0', 'print0', None, _('end filenames with NUL, for use with xargs')),