fcp-example.w

@@ -25,7 +25,7 @@ import
     only (ice-9 pretty-print) pretty-print
     only (srfi srfi-1) first second third assoc
     only (srfi srfi-26) cut
-    srfi srfi-37 ;; commandline handling
+    only (srfi srfi-37) option args-fold ;; commandline handling
     only (rnrs bytevectors) string->utf8 utf8->string
 
 
@@ -81,8 +81,8 @@ define options
                 quit
         option '(#\h "help") #f #f
             λ (opt name args loads)
-                format #t "Usage: ~a [options] 
-                
+                format #t "Usage: ~a [options]
+
 Options: 
     -h --help                                 show this dialog
     -V --version                              show the version