Specify repodir in darcs init, otherwise it fails

If `darcs init` isn't given a `--repodir`, even if you do specify the
new repository's path, it complains that it can't run inside a
repository, because it's running from a darcs clone of Vervis itself. If
the repo dir is specified using `--repodir` instead, Darcs doesn't
complain.

That's at least the situation with 2.8.5, didn't check other versions.

src/Darcs/Local/Repository.hs

@@ -62,7 +62,7 @@ createRepo
 createRepo parent name = do
     let path = parent </> name
     createDirectory path
-    let settings = proc "darcs" ["init", "--no-working-dir", path]
+    let settings = proc "darcs" ["init", "--no-working-dir", "--repodir", path]
     (_, _, _, ph) <- createProcess settings
     ec <- waitForProcess ph
     case ec of