Remove unused variable

2019-12-28 02:49:28 +02:00 · 2019-12-28 02:49:28 +02:00 · 4591f2588a
parent a0ea1aabe2
commit 4591f2588a
1 changed files with 1 additions and 2 deletions
--- a/trivial-tar-writer.scm
+++ b/trivial-tar-writer.scm
@ -29,8 +29,7 @@
                       bytes (bytevector 0))))

 (define (tar-write-file fake-path bytes)
-  (let* ((unix-time-now 0)
-         (nbyte (bytevector-length bytes))
+  (let* ((nbyte (bytevector-length bytes))
         (nnull (- 512 (truncate-remainder nbyte 512)))
         (header-before-checksum
          (bytevector-append