Differentiate "not found" and "fail" when deleting.

Do not halt a deletion process when trying to delete something
that was not found.

1 files changed, 10 insertions, 4 deletions

diff --git a/src/luarocks/repos.lua b/src/luarocks/repos.lua
index c20d3589..12927153 100644
--- a/src/luarocks/repos.lua
+++ b/src/luarocks/repos.lua
@@ -214,12 +214,12 @@ end
 local function delete_suffixed(file, suffix)
    local suffixed_file, err = find_suffixed(file, suffix)
    if not suffixed_file then
-      return nil, "Could not remove " .. file .. ": " .. err
+      return nil, "Could not remove " .. file .. ": " .. err, "not found"
    end
 
    fs.delete(suffixed_file)
    if fs.exists(suffixed_file) then
-      return nil, "Failed deleting " .. suffixed_file .. ": file still exists"
+      return nil, "Failed deleting " .. suffixed_file .. ": file still exists", "fail"
    end
 
    return true
@@ -378,8 +378,14 @@ function repos.delete_version(name, version, deps_mode, quick)
             target = versioned
          end
 
-         local ok, err = delete_suffixed(target, suffix)
-         if not ok then return nil, err end
+         local ok, err, err_type = delete_suffixed(target, suffix)
+         if not ok then
+            if err_type == "not found" then
+               util.warning(err)
+            else
+               return nil, err
+            end
+         end
 
          if not quick and target == non_versioned then
             -- If another package provides this file, move its version