oops, forgot to open the port in binary mode as required.

dyoo · Jan 16, 2013 · f74ce25 · f74ce25
1 parent 7db50ef
commit f74ce25
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/ragg/manual.scrbl b/ragg/manual.scrbl
@@ -15,7 +15,7 @@
    (date->string a-date))
 
 @(define (compute-md5sum filename)
-   (bytes->string/utf-8 (call-with-input-file filename md5)))
+   (bytes->string/utf-8 (call-with-input-file filename md5 #:mode 'binary)))