Changeset 11984 in project for release/4/spiffy/trunk/spiffy.scm

Timestamp:

09/23/08 22:56:43 (13 years ago)

Author:

sjamaan

Message:

Remove bogus unused default-file-handler

File:

• release/4/spiffy/trunk/spiffy.scm (modified) (1 diff)

release/4/spiffy/trunk/spiffy.scm

@@ -148 +148 @@
 (define (extension->mime-type ext)
   (alist-ref (or ext "") (mime-type-map) string-ci=? (default-mime-type)))
-
-(define (default-file-handler file)
-  (fprintf (response-port (current-response)) "GOT FILE ~A\n" file))
 
 (define (with-headers new-headers thunk)