From 1b372bcb2b9461c71fbc04d780aa09061776df92 Mon Sep 17 00:00:00 2001
From: Daniel Barlow <dan@telent.net>
Date: Wed, 15 Feb 2023 19:50:00 +0000
Subject: [PATCH] simpler eof handling

---
 pkgs/tufted/tufted.fnl | 10 ++--------
 1 file changed, 2 insertions(+), 8 deletions(-)

diff --git a/pkgs/tufted/tufted.fnl b/pkgs/tufted/tufted.fnl
index 417794c..d2f58c4 100644
--- a/pkgs/tufted/tufted.fnl
+++ b/pkgs/tufted/tufted.fnl
@@ -33,15 +33,9 @@
           (values
            (fn handler [reqlen]
              (let [bytes (f:read reqlen)]
-               (if eof?
-                   false
-                   bytes
+               (if bytes
                    (values true bytes)
-                   (do
-                     ;; if the file length is divisible by the block
-                     ;; length, need to send an empty block at eof
-                     (set eof? true)
-                     (values true "")))))
+                   (values false nil))))
            size))
         (error "host not allowed")))
   nil