don't use #:logger argument

pollen/private/command.rkt

@@ -27,6 +27,7 @@
      (very-nice-path (car args)))))
 
 (define (dispatch command-name)
+  (parameterize ([current-logger pollen-logger])
     (with-logging-to-port
      (current-error-port)
      (λ ()
@@ -41,9 +42,8 @@
          [("setup") (handle-setup (get-first-arg-or-current-dir))]
          [("clone" "publish") (handle-publish)]
          [else (handle-unknown command-name)]))
-   #:logger pollen-logger
      'info
-   'pollen))
+     'pollen)))
 
 (define (very-nice-path x)
   (path->complete-path (simplify-path (cleanse-path (->path x)))))