diff options
| -rw-r--r-- | henrietta-cache.scm | 2 | 
1 files changed, 1 insertions, 1 deletions
| diff --git a/henrietta-cache.scm b/henrietta-cache.scm index 4ef9473..2a51f35 100644 --- a/henrietta-cache.scm +++ b/henrietta-cache.scm @@ -26,7 +26,7 @@ EOF                                        (->string (cdr pattern))))                                patterns))) -;; We could also use sendfile egg here, but do we want to the dependency? +;; We could also use sendfile egg here, but do we want the dependency?  (define (copy-port in out #!optional limit)    (let ((bufsize 1024))     (let loop ((data (read-string (min (or limit bufsize) bufsize) in))) | 
