small fixes

mod/core/coro.lua

@@ -3,7 +3,6 @@
 -- Written by Cosmin Apreutesei. Public Domain.
 
 -- Reworked from the (in)famous coro lib
----@diagnostic disable: duplicate-set-field
 
 local old_create = coroutine.create;
 local old_close = coroutine.close;

mod/core/string.lua

@@ -50,21 +50,21 @@ return function (glob)
 	--- @param self string
 	function glob.string:quotesh()
 		return "'" .. self
-			:gsub("*", "\\*")
+			:gsub("%*", "\\*")
-			:gsub("?", "\\?")
+			:gsub("%?", "\\?")
-			:gsub("~", "\\~")
+			:gsub("%~", "\\~")
-			:gsub("$", "\\$")
+			:gsub("%$", "\\$")
-			:gsub("&", "\\&")
+			:gsub("%&", "\\&")
-			:gsub("|", "\\|")
+			:gsub("%|", "\\|")
-			:gsub(";", "\\;")
+			:gsub("%;", "\\;")
-			:gsub("<", "\\<")
+			:gsub("%<", "\\<")
-			:gsub(">", "\\>")
+			:gsub("%>", "\\>")
-			:gsub("(", "\\)")
+			:gsub("%(", "\\)")
-			:gsub("[", "\\]")
+			:gsub("%[", "\\]")
-			:gsub("{", "\\}")
+			:gsub("%{", "\\}")
-			:gsub("%\\", "\\\\")
+			:gsub("%%\\", "\\\\")
-			:gsub("\'", "\\\'")
+			:gsub("%\'", "\\\'")
-			:gsub("\"", "\\\"")
+			:gsub("%\"", "\\\"")
-			:gsub("`", "\\`") .. "'";
+			:gsub("%`", "\\`") .. "'";
 	end
 end

mod/fs.lua

@@ -16,8 +16,12 @@ function exports.pwd()
 	return os.getenv "PWD" or "./";
 end
 
+--- @param path string
 function exports.ls(path)
-	return os.execute("ls ")
+	local f = assert(io.popen("ls " .. path:quotesh()));
+	local res = f:read "*a";
+	f:close();
+	return res;
 end
 
 return exports;

mod/tal/cli.lua

@@ -213,7 +213,7 @@ function exports.main(...)
 			elseif mod and type(mod.main) == "function" then
 				return mod.main(...);
 			end
-		end, ...);
+		end, unpack(args));
 	else
 		return exports.repl();
 	end