init: only create wrappers if they don't already exist

1 files changed, 12 insertions, 6 deletions

diff --git a/src/luarocks/cmd/init.lua b/src/luarocks/cmd/init.lua
index e037fb55..5c0116ce 100644
--- a/src/luarocks/cmd/init.lua
+++ b/src/luarocks/cmd/init.lua
@@ -77,14 +77,20 @@ function init.command(flags, name, version)
    fs.make_dir("lua_modules/lib/luarocks/rocks-" .. cfg.lua_version)
    local tree = dir.path(pwd, "lua_modules")
 
-   util.printout("Preparing ./luarocks ...")
+   local ext = cfg.wrapper_suffix
 
-   fs.wrap_script(arg[0], "luarocks", nil, nil, "--project-tree", tree)
-
-   util.printout("Preparing ./lua ...")
+   local luarocks_wrapper = "./luarocks" .. ext
+   if not fs.exists(luarocks_wrapper) then
+      util.printout("Preparing " .. luarocks_wrapper .. " ...")
+      fs.wrap_script(arg[0], "luarocks", nil, nil, "--project-tree", tree)
+   end
 
-   path.use_tree(tree)
-   fs.wrap_script(nil, "lua")
+   local lua_wrapper = "./lua" .. ext
+   if not fs.exists(lua_wrapper) then
+      util.printout("Preparing " .. lua_wrapper .. " ...")
+      path.use_tree(tree)
+      fs.wrap_script(nil, "lua")
+   end
 
    return true
 end