Index: spiffy.scm
===================================================================
--- spiffy.scm	(revision 30818)
+++ spiffy.scm	(working copy)
@@ -289,7 +289,8 @@
   (call-with-input-file file (lambda (p)
                                (handle-exceptions exn
                                  (begin (close-input-port p) (raise exn))
-                                 (proc p)))))
+                                 (proc p)))
+                        #:binary))
 
 (define (send-response #!key code reason status body (headers '()))
   (let* ((new-headers (cons `(content-length ,(if body (string-length body) 0))