Fix persist for multiline strings ending with closing bracket prefix

1 files changed, 2 insertions, 1 deletions

diff --git a/src/luarocks/persist.lua b/src/luarocks/persist.lua
index c2adb570..636de260 100644
--- a/src/luarocks/persist.lua
+++ b/src/luarocks/persist.lua
@@ -98,7 +98,8 @@ local function write_value(out, v, level, sub_order)
       if v:match("[\r\n]") then
          local open, close = "[[", "]]"
          local equals = 0
-         while v:find(close, 1, true) do
+         local v_with_bracket = v.."]"
+         while v_with_bracket:find(close, 1, true) do
             equals = equals + 1
             local eqs = ("="):rep(equals)
             open, close = "["..eqs.."[", "]"..eqs.."]"