1 files changed, 1 insertions, 1 deletions

diff --git a/spiffy.scm b/spiffy.scm
index 83f51cf..83fe21b 100644
--- a/spiffy.scm
+++ b/spiffy.scm
@@ -531,7 +531,7 @@
                      (send-status 'bad-request
                                   (conc "<p>Your client sent a request that "
                                         "the server did not understand</p>")))
-                 (unless (##sys#slot out 8) ;; port-closed?
+                 (unless (port-closed? out)
                    (flush-output out))
                  (handle-another-request?)))))))) ; Keep going?