Add --project-tree flag, for prepending a flag

2 files changed, 5 insertions, 0 deletions

diff --git a/src/luarocks/command_line.lua b/src/luarocks/command_line.lua
index c8026ab6..07f86a7f 100644
--- a/src/luarocks/command_line.lua
+++ b/src/luarocks/command_line.lua
@@ -131,6 +131,10 @@ function command_line.run_command(...)
      cfg.branch = flags["branch"]
    end
    
+   if flags["project-tree"] then
+      table.insert(cfg.rocks_trees, 1, { name = "project", root = flags["project-tree"] } )
+   end
+
    if flags["tree"] then
       local named = false
       for _, tree in ipairs(cfg.rocks_trees) do
diff --git a/src/luarocks/util.lua b/src/luarocks/util.lua
index 64765a43..ea18071f 100644
--- a/src/luarocks/util.lua
+++ b/src/luarocks/util.lua
@@ -129,6 +129,7 @@ local supported_flags = {
    ["output"] = "<file>",
    ["pack-binary-rock"] = true,
    ["porcelain"] = true,
+   ["project-tree"] = "<tree>",
    ["quick"] = true,
    ["rock-dir"] = true,
    ["rock-namespace"] = true,