diff options
| -rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 64ca38e..6995dac 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -64,7 +64,8 @@ (force-output output-port)) #f ; fetch one character (lambda () - (close-port output-port)) + ;; close port + #f) #f) ; number of characters that can be read "w")) |