red: fifo shell fix

hugeping · Oct 25, 2023 · 0343fff · 0343fff
1 parent e2de808
commit 0343fff
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 3 deletions.
diff --git a/data/lib/red/proc.lua b/data/lib/red/proc.lua
@@ -356,13 +356,17 @@ local function piped(w, out, prog)
   end
   local txt = w.buf:gettext(w.buf:range())
   out:run(function()
-    while txt ~= '' do
+    while txt ~= '' and ret.fifo do
       ret.fifo:write(txt:sub(1, 256))
       txt = txt:sub(257)
       coroutine.yield(true)
     end
-    ret.fifo:close()
-    ret.fifo = nil
+--[[
+    if ret.fifo then
+      ret.fifo:close()
+      ret.fifo = nil
+    end
+]]--
   end)
 end
 

diff --git a/data/lib/red/shell.lua b/data/lib/red/shell.lua
@@ -146,6 +146,9 @@ function shell.pipe(w, prog, inp, sh)
       ret.fifo = nil
     end
     if not ret.stopped then
+      if tmp then
+        os.remove(tmp)
+      end
       p:err("kill")
       p:detach()
       ret.stopped = true