Use spaces instead of tabs for indentation

Use unless instead of when
Fix indentation
2024-03-13 17:21:14 +00:00 · 2024-03-13 17:20:56 +00:00 · 2024-03-13 17:20:49 +00:00
1 changed files with 29 additions and 29 deletions
--- a/tsv2vcard.scm
+++ b/tsv2vcard.scm
@ -39,7 +39,7 @@
 (define (foreach-line thunk)
  (let loop ()
    (let ((line (get-line (current-input-port))))
-	  (when (not (eof-object? line))
+      (unless (eof-object? line)
        (display (thunk line))
        (loop)))))
Author	SHA1	Message	Date
Camden Dixie O'Brien	938fd7d41b	Use spaces instead of tabs for indentation	2024-03-13 17:21:14 +00:00
Camden Dixie O'Brien	1381f0b881	Use unless instead of when	2024-03-13 17:20:56 +00:00
Camden Dixie O'Brien	085736da27	Fix indentation	2024-03-13 17:20:49 +00:00